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NOTATIONAL CONVENTIONS 


This manual uses the following notation: 


mqc and mgqer 


Ranges 


ST..ST(7) 


H suffix or (Hex) 


are prefixes written in lowercase except in 
examples. The Decimal Conversion Library 
and Common Elementary Function Library 
routines begin with mqc and mger, 
respectively. These prefixes are lowercase to 
make each routine’s name more readable. 


are expressed as a..b and are inclusive: a@ and 
b are part of the range. 


denote the 80387 stack elements. ST and 
ST(0) are equivalent representations for the 
80387 stack top; the seven remaining stack 
elements are ST(1)..ST(7), respectively. 


represent elements of the set of real numbers. 
represents an element of the set of integers. 


represent elements of the set of complex 
numbers. 


represents an angle expressed in radians. 


indicates a value expressed in hexadecimal. 
Otherwise, values are expressed in decimal. 


indicates one or more lines of code omitted 
from an example. The omitted lines are 
application-specific rather than essential to an 
understanding of the example. 
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Preface 


This manual is a reference for the 80387 Support Library. It assumes 
that you are familiar with the 80387 numerics coprocessor for 80386- 
based systems. It has the following chapters and appendixes: 


Chapter 1, Numerics Support and 80387 Initialization, contains an 
overview of the 80387 Support Library and of its configurations 
and linkage requirements. It also contains an explanation of the 
80387 Initialization Library. 


Chapter 2, Decimal Conversion Library, contains information 
about the decimal-to-binary, binary-to-decimal, and binary-to- 
binary conversion routines. Each routine has an ASM386 example. 


Chapter 3, Common Elementary Function Library, contains 
information about the algebraic, logarithmic, exponential, 
trigonometric, and hyperbolic real and complex functions. Each 
function has an ASM386 example. 


Chapter 4, Exception Handling Library, contains information 
about utility routines that make writing exception handlers for 
80387 exceptions easier. This chapter has an ASM386 template 
for an exception handler, as well as an example for each routine. 


Appendix A, 80387 Support Library PUBLIC Symbols, lists the 
names of all PUBLIC symbols in the 80387 Support Library 
modules, 


Appendix B, High-level Languages and the 80387 Support 
Library, contains information about calling Support Library 
routines from high-level languages. This appendix has PL/M-386 
examples for representative routines. 


Appendix C, ANSI/IEEE Std 754-1985 Conformance, explains the 
relationship between the 80387 Support Library and the /EEE 
Standard for Binary Floating-Point Arithmetic. 


Appendix D, 80387 Numeric Data Formats, contains a reference 
for the 80387 integer and real formats. 


Appendix E, ASM386 Floating-Point Instructions, contains a 
summary of the operands, operation, and possible exceptions for 
each 80387 instruction. It also contains a list of exception opcodes 
returned by the exception handling utilities (see 

Chapter 4). 


viii 


e Appendix F, 80387 Support Library Summary, contains a quick 
reference for the parameters, results, possible exceptions, and 
exception opcodes of the Decimal Conversion, Common 
Elementary Function, and Exception Handling routines. 


A glossary and index follow the appendixes. ) 


Related Publications 

The following contain detailed information about 80386 architecture, 

the 80387 numerics coprocessor, and numerics processing: 

e 80386 Programmer's Reference Manual, order number 230985 

e 80386 System Software Writer’s Guide, order number 231499 

¢ 80387 Programmer’s Reference Manual, order number 231917 

e JEEE Standard for Binary Floating-Point Arithmetic (ANSI/IEEE 
Std 754-1985) 

The following contain information about linking and locating 

programs that call 80387 Support Library routines: oO 

e Intel386™ Family Utilities User’s Guide, order number 481343 

e Intel386™ Family System Builder User’s Guide, order number 
481342 


See also your language reference manual if you want to call 80387 
Support Library routines in high-level language programs. 


See the Release Notes for how to install the 80387 Support Library on 
your system. 
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Chapter 1 
Numerics Support and 80387 Initialization 


This chapter contains two major sections: 
1. An overview of the 80387 Support Library 


2. An explanation of the Initialization Library 


1.1 80387 Support Library Overview 


The 80387 Support Library is a collection of four functionally distinct 
libraries: 


1. Initialization Library routines set up the numerics processing 
environment for 80386-based systems with an 80387 or true 
software emulator. See Section 1.2 for more information about the 
Initialization Library. 


2. “Decimal Conversion Library (DC387) routines convert floating- 
point numbers from one 80387 binary storage format to another or 
from ASCII decimal strings to 80387 binary floating-point format 
and vice versa. See Chapter 2 for more information about DC387. 


3. Common Elementary Function Library (CL387) routines perform 
algebraic, logarithmic, exponential, trigonometric, and hyperbolic 
operations on real and complex numbers, as well as real-to-integer 
conversions. See Chapter 3 for more information about CL387. 


4. Exception Handling Library (EH387) routines make writing 
numerics exception handlers easier. See Chapter 4 for more 
information about EH387. 


All 80387 Support Library modules are in 80386 Object Module 
Format (OMF386). They can be linked (see Section 1.1.2) with the 
OMF386 output of any Intel translator to execute on an 80387 or on 
an 80386 with a true software emulator. All routines are completely 
reentrant: working storage is on the 80387 stack, on the 80386 stack, 
or in the 80386 registers. All 80387 Support Library modules declare 
their routines as PUBLIC symbols (see Appendix A). You must 
declare each routine as an external symbol before it is called (see 
Section 1.2.2 and Appendix B for example declarations). 


1.1.1 80387 Support Library Configurations 


Each of the 80387 Support Libraries has near and far versions: 


e The 80387N.LIB, DC387N.LIB, CL387N.LIB and EH387N.LIB 
modules contain the near versions of the 80387 Support Libraries: 


o Near library modules have a code segment named CODE32 
and a single combined data/stack segment named DATA. The 
80386 DS, ES, and SS registers are assumed to access the 
DATA segment. 


o Although parameters to the Decimal Conversion and Exception 
Handling routines are 48-bit pointers, only the low-order 32 
bits of such parameters are meaningful within near library 
modules. Calls to library routines are offset only. 


e The 80387F.LIB, DC387F.LIB, CL387F.LIB, and EH387F.LIB 
modules contain the far versions of the 80387 Support Libraries: 


o Far library modules have separate code, data, and stack 
segments. 


o Pointer parameters to the Decimal Conversion and Exception 
Handling routines are 48-bit segment:offset pairs, each 
pointing to a 16-bit segment base and 32-bit offset in 80386 
memory. Calls to library routines are segment:offset. 


80387 Support Library code is USE32: all offsets are 32 bits and the 
80386 stack is 32 bits wide. 


1.1.2 80387 Support Library Linkage 
Any program with near or far calls to Support Library routines must 
be linked with the appropriate Support Library modules: 
CL387N.LIB or CL387F.LIB 
DC387N.LIB or DC387F.LIB 
EH387N.LIB or EH387F.LIB 
80387N.LIB or 80387F.LIB 
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Link your code only to Support Library modules that contain routines 
your program calls. For example, link with CL387N.LIB and 
80387N.LIB if your program calls only the INIT87 and mqerTAN 
routines in a code segment named CODE32 (see Section 1.1.1). 


1.2 Initialization Library Overview 


The 80386-based 80387 Initialization Library consists of two routines, 
INIT87 and INITFP, that set up the numerics processing environment 
for the following: 


e Execution of floating-point instructions, whether in a high-level 
language (see Appendix B), in ASM386 (see Appendix E), or both 


e Calls to 80387 Support Library routines in the Decimal Conversion 
Library (DC387), Common Elementary Function Library (CL387), 
and Exception Handling Library (EH387) 


1.2.1 INIT87 and INITFP Routines 


INIT87 and INITFP initialize the 80387 and leave it in a known state, 
ready to perform floating-point operations. Both routines set up the 
following modes in the 80387 Control Word: 


e Precision is extended (64-bit significand). 
e Rounding is to nearest with even preferred (default 80387 
rounding mode). 


Both routines also clear 80387 exceptions and leave the 80387 stack 
empty on return to the caller. Neither routine requires parameters. 


The only difference between INIT87 and INITFP is how each masks 

numeric exceptions in the 80387 Control Word: 

e INIT87 masks all exceptions. 

e¢ INITFP masks all exceptions except I (Invalid Operation). Note 
that an 80387 stack fault is reported as an I exception. 


After a call to INIT87 or INITFP, you can modify the Control Word 
to suit the needs of your program. 
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1.2.2 Declaring Initialization Routines in ASM386 Programs 


The 80387 Initialization Library can be linked to code that is within 
the same code segment or to code that is in another code segment. 
However, you must declare the initialization routine within the calling 
module. For example, when a module contains a call to INIT87, make 
one of the following declarations: 


e If you want your code to be within the same segment as the 
initialization, use the 80387N.LIB (near library). Declare INIT87 
as follows before calling this routine: 


CODE32 SEGMENT ER 3; Segment name must be CODE32. 
; Library segments are USE32. 
EXTRN INIT87: NEAR 3; INIT87 is now callable. 


CODE32 ENDS 


e If you want your code to be in a different segment from the 
initialization, use the 80387F.LIB (far library). Declare INIT87 as 
follows before calling this routine: 


EXTRN INIT87: FAR 3; Declaration must be outside 
all SEGMENT..ENDS pairs 

of the module. INIT87 is 
now callable within the 
module. 
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Chapter 2 
Decimal Conversion Library 


oO This chapter has two major sections: 
1. An overview of the 80387 Decimal Conversion Library (DC387) 
2. A reference for the DC387 routines 


2.1 Library Overview 


The 80386-based 80387 Decimal Conversion Library consists of 
routines that convert floating-point numbers either from one 80387 
binary storage format to another or from ASCII decimal strings to 
80387 binary floating-point format and vice versa. These routines 
can be linked with the OMF386 output of any Intel translator to 
execute on an 80387 or on an 80386 with a true software emulator. 


For maximum execution speed, DC387 is coded in ASM386 assembly 
#) language. The DC387 decimal-to-binary, binary-to-decimal, and 

binary-to-binary conversion routines not only conform with the 

ANSI/IEEE754-1985 Standard for Binary Floating-Point Arithmetic, 

they exceed its requirements (see Appendix C for details). 

The following subsections explain: 

e How to declare DC387 routines in ASM386 programs 

e How to declare the data structures for these routines 

e How DC387 routines return results 

¢ How DC387 uses the 80387 and 80386 stacks 

e How DC387 uses the 80386 registers 


e How the 80387 Control Word affects the DC387 routines and vice 
versa 


oO e How DC387 detects, responds to, and reports 80387 exceptions 


2.1.1 Declaring DC387 Routines in ASM386 Programs 


The Decimal Conversion Library can be linked to code that is within 
the same code segment or to code that is in another code segment. 
However, you must declare each DC387 routine that your program 
calls within the calling module. For example, within a module that 
calls mqcXTND_DUBL, make one of the following declarations: 


e If you want your code to be within the same segment as DC387, 
use the DC387N.LIB (near library). Declare mqcXTND_DUBL as 
follows before calling this routine: 


CODE32 SEGMENT ER 3 


we 


EXTRN MQCXTND_DUBL: NEAR 


> 


CODE32 ENDS 


e If you want your code to be in 


Segment name must be CODE32. 
DC387 segments are USE32. 


3 MQCXTND_DUBL is now callable. 


a different segment from DC387, 


use the DC387F.LIB (far library). Declare mqcXTND_DUBL as 
follows before calling this routine: 


EXTRN MQCXTND DUBL: FAR 


° 
> 
. 
> 
. 
> 


Declaration must be 
outside all SEGMENT..ENDS 
pairs of the module. 


Declare only those DC387 routines that each module calls and link to 
the appropriate DC387N.LIB or DC387F.LIB file before executing the 


program. Note that DC387 library 


modules use 32-bit addressing. 


See the reference pages in Section 2.2.3 for ASM386 examples of how 
to declare each DC387 routine. See Appendix B for more information 
about declaring DC387 routines in high-level language modules. 


2.1.2 Declaring DC387 Parameters and Data Structures 


Parameters to the DC387 routines are pointers pushed on the 80386 
stack. The segment part of a far pointer must be pushed as a 4-byte 
quantity because DC387 uses a 32-bit wide stack. Any push of a 
segment register in a USE32 segment automatically pushes 4 bytes on 
the stack. ASM386 parameters to the DC387N.LIB routines must be 
declared in a combined data/stack segment named DATA. 
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DC387 routines that convert from one 80387 binary floating-point 
format to another require two parameters: 


e A pointer to the input buffer where the value to be converted is 
stored in 80386 memory 


e A pointer to the output buffer where the DC387 binary-to-binary 
routine stores its converted result 


DC387 routines that convert from decimal to binary or from binary to 
decimal require one parameter: a pointer to a structured, contiguous 
block of storage in 80386 memory. The following declarations define 
the ASM386 structures for mqcDEC_BIN, mqcDECLOW_BIN, and 
mqcBIN_DECLOW. Most ASM386 examples for these routines in 
this chapter assume that these declarations have been made. 


3 The following are named constants for both 

3; structures’ PRSCN field. Values indicate an 

; input/output real's format, using the same codes 

; as the PRECISION field of the 80387 Control Word. \ 


SNGL_PRSCN EQU 0 ; for 32-bit single format 
DUBL_PRSCN EQU“Q 3; for 64-bit double format 
XTND_PRSCN EQU x 3 for 80-bit extended format re 


; The following declaration is the Decimal ey 
: Block (DCB) data structure. mqcDEC_BIN's parameter 


; points to a variable of this structure type. “est aw 


DCB  STRUC 
B BUF PTR DP ? segment:offset (16:32 oS 
for binary output buffer 


DC387N.LIB uses offset only 


PRSCN DB ? (8-bit code) see preceding 
constant definitions 
LGNTH DB ? (8-bit ordinal) length 


of input digit string 
segment:offset (16:32 bits) 
for decimal input buffer 
DC387N.LIB uses offset only 


D_BUF_PTR DP ? 


we we we we we we we we we we 


DCB ENDS 


Figure 2-1 illustrates the DCB data structure, followed by the 
declaration of the ADCB data structure. 


Decimal Conversion Library 2-3 


Byte offset 


LNGTH PRSCN B_BUF_PTR SEGMENT* Oo 


D_BUF_PTR SEGMENT* 


“Meaningful only for DC387F.LIB 


PCD0001 
Figure 2-1 DCB Layout 


3; The following declaration defines the Alternative 

3 Decimal Conversion Block for mqcDECLOW BIN (decimal 
; to binary) and the Augmented Decimal Conversion 

; Block (ADCB) for mqcBIN DECLOW (binary to decimal). 
3 mqcDECLOW BIN's and mqcBIN DECLOW's parameters point 
; to variables of the ADCB structure type. 


ADCB STRUC ; initial ADCB fields accessed oO 
by DCB field names: 
DP ? B BUF PTR to binary buffer: 
output for Alternative block 
or input for Augmented block 
PRSCN: format, Alternative 
output or Augmented input 
LGNTH: string, Alternative 
output or Augmented input 
D_BUF_PTR to decimal buffer: 
input for Alternate block or 
output for Augmented block 
(16-bit) two's complement 
integer is value of true 
decimal exponent 
SIGN DB ? (8-bit) ASCII value 


ADCB ENDS oO 


Figure 2-2 illustrates the ADCB data structure. 


DB ? 
DB ? 


DP ? 


SCALE DW ? 


we we we we we we we we we we Oe we we OO 
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Byte offset 


B_BUF_PTR OFFSET 
Oo PRSCN B_BUF_PTR SEGMENT* 


D_BUF_PTR OFFSET 
D_BUF_PTR SEGMENT* 


*Meaningtful only for DC387F.LIB 


Figure 2-2 ADCB Layout FCROOG2 


2.1.3 DC387 Resulis 


The DC387 routines are external procedures that produce results in 
two ways: 


O 1. Each DC387 routine uses one or two pointer parameters to access 
floating-point values in 80386 memory. Each converts an input 
value from one representation to another, stores this result in 
another 80386 memory location, and pops all input parameters 
from the 80386 stack before returning control to its caller. 


2. Every DC387 routine returns an updated copy of the 80387 
exception byte (see Section 2.1.7) to the AL register before 
returning control to its caller. 


As a language, ASM386 does not distinguish between routines that are 
procedures (produce results indirectly) and those that are functions 
(return typed results directly). However, many high-level languages 
do distinguish between procedures and functions. Note that a DC387 
routine might be either a procedure or a function in such a language, 
depending on how it is declared. See Appendix B for more 

O information about declaring DC387 routines in high-level languages. 
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2.1.4 DC387 Stack Requirements 


DC387 routines save the entire 80387 state, including its stack, when 
they are called. They restore the 80387 to its original state before 
returning control to the caller. Therefore, DC387 does not require 
you to leave 80387 stack positions free for its use. 


All DC387 routines are completely reentrant: they use no fixed 80386 
memory locations to store internal variables. However, any procedure 
that interrupts DC387 should save the entire 80387 stack upon entry 
and restore it before returning control to DC387. 


DC387N.LIB requires 240 bytes on the 80386 stack for its internal 
storage; DC387F.LIB requires 288 bytes. DC387 itself allocates the 
required stack bytes within its modules. However, a program such as 
a numeric exception handler could interrupt DC387 and then call 
DC387 again. If this occurs, the exception handler should allocate an 
additional 240 (near library) or 288 (far library) bytes on the 80386 
stack at each recursion. 


2.1.5 DC387 Register Usage 


DC387 conforms to the register-saving conventions of Intel 80386 
high-level languages. According to these conventions: 


e The DC387 routines must leave the 80386 DS, ES, SS, and EBP 
registers unchanged. For DC387N.LIB, ES is assumed to access 
the same combined data/stack segment (DATA) as DS. 


e The DC387 routines may destroy the contents of the EAX, EBX, 
ECX, EDX, EDI, ESI, FS, and GS registers. 


2.1.6 80387 Control Word Settings 


All DC387 routines save the 80387 Control Word when they are called 
and restore it before returning control to the caller. However, DC387 
routines sometimes use a different rounding mode than their callers: 


e The binary-binary routines mqcXTND_DUBL, 
mqcXTND_SNGL, mqcDUBL_XTND, and mqcSNGL_XTND 
round results according to the caller’s rounding mode. 


2-6 Decimal Conversion Library 


Oo 


Oo 


* 


Oo 


e The decimal-binary routines mqcDEC_BIN, mqcDECLOW_BIN, 
and mqcBIN_DECLOW always round results to nearest with even 
preferred, regardless of the caller’s rounding mode. 


DC387 places no constraints on the setting of exception masks in the 
80387 Control Word (see Sections 2.1.7.1 and 2.1.7.2). 


2.1.7 DC387 Numeric Exceptions 


#) Bits: 


Oo 


DC387 routines signal some of the same numeric exceptions as the 
80387 instructions. DC387 routines report 80387 exceptions by setting 
appropriate bits in the 80387 exception byte, which is the low-order 
byte of the Status Word. The DC387 routines copy this byte to the 
AL register (see Section 2.1.3) before restoring the caller’s 80387 state 
and returning control to the caller. 


Figure 2-3 illustrates the 80387 exception byte, with possible DC387 
exceptions shown in bold-faced type (S and Z never occur). 


7 6 5 4 3 2 1 0 
E Ss P U Oo Z D I 


Figure 2-3 80387 Exception Byte for DC387 


The DC387 routines behave like atomic instructions in detecting, 
responding to, and reporting the I, D, O, U, and P numeric 
exceptions: 


I DC387 signals the Invalid Operation exception for such 
programming errors as: 


e Input floating-point values in 80387 unsupported formats 
(pseudozeros, psuedo-NaNs, pseudoinfinities, and unnormals) 


e Input floating-point values that cannot be converted as 
specified by the combination of ADCB field values (see 
mqcBIN_DECLOW) 


D DC387 signals the Denormal exception for an input denormal 
value. 
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O DC387 signals the numeric Overflow exception when the exponent 
of a rounded result is too large for the format of the destination. 


U DC387 signals the numeric Underflow exception when a result is 
too tiny to be represented accurately in the destination format if 
underflow is masked. It signals the Underflow exception when a QO 
normalized result is too tiny for the destination format if 
underflow is unmasked. 


P DC387 signals the numeric Precision (inexact) exception when a 
result must be rounded to fit in the destination format. 


E DC387 sets the Exception Status bit (7) if it sets any of the I, D, 
O, U, and P bits (0, 1, 3..5) of the 80387 exception byte (see 
Figure 2-3). 


DC387 routines are like atomic instructions: each routine reports 
exceptions when the mathematical definition of the routine requires it 
to take exception to particular input values or results. 


2.1.7.1 DC387 Masked Exception Handling 


DC387 responds to masked exceptions just as the 80387 does. It sets oO 
the appropriate bit of the 80387 exception byte and supplies a default 

result. See each routine in Section 2.2.3 for specific information 
about default results for masked exceptions. 


2.1.7.2 DC387 Unmasked Exception Handling 


DC387 provides exception handling information in the same data 
structure that the 80387 uses for handling unmasked exceptions: the 
80387 State. 


When an unmasked exception generates an Interrupt 16 (Processor 
Extension Error) from a DC387 routine, the interrupt comes from a 
DC387 code site where cleanup of the 80386 stack is about to occur 
just before DC387’s return to its caller. When an exception handler 
for the Processor Extension Error executes its IRETD, the return is to 
this cleanup section. The DC387 routine first restores the caller’s 
80387 State and then returns control to its caller. 


At the time of such a trap from DC387, the 80387 State consists of 


the 80387 Environment and 80387 stack information summarized in 
Table 2-1. 
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Table 2-1 80387 State at DC387 Trap 


Field Contains 

Control Word caller's Control Word 

Status Word (caller's Status Word OR DC387 exceptions) 
Tag Word 80387 stack, as shown (see ST..ST(7) following) 
EIP Offset FFFFFFFFH for USE32 protected mode 

or Instruction Pointer © FFFFFFFFH for USE32 real address mode 
Opcode DC387 routine’s exception opcode 

ST DC387 routine’s input or result 

ST(1)..ST(7) empty 


An exception handler for the Processor Extension Error can examine 
the 80387 Instruction Pointer or EIP Offset value to determine 
whether DC387 generated an Interrupt 16. It can identify which 
DC387 routine caused the interrupt by examining the Opcode field 
value (see Table 2-1). 


2.2 Decimal Conversion Library Routines 


This section contains: 
e A summary of the DC387 routines 
e Information about how to read each routine’s reference pages 


e A comprehensive reference for each DC387 routine in alphabetic 
order 


2.2.1 Summary of DC387 Routines 
Table 2-2 lists the DC387 routines, their pointer parameters, and what 
each routine does. See Section 2.1.2 for a general discussion of the 


parameters to these routines. See each routine in Section 2.2.3 for 
details. 
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Table 2-2 Decimal Conversion Library Routines 


Binary to Binary Routines 
Name Parameters Description 


mqcXTND_DUBL XTND_PTR Converts binary value in 80-bit 
DUBL_PTR extended format to same value 
in 64-bit double format 
mqcXTND_SNGL XTND_PTR Converts binary value in 80-bit 
SNGL_PTR extended format to same value 
in 32-bit single format 
mqcDUBL_XTND DUBL_PTR Converts binary value in 64-bit 
XTND_PTR double format to same value 
in 80-bit extended format 
mqcSNGL_XTND SNGL_PTR Converts binary value in 32-bit 
XTND_PTR single format to same value 
in 80-bit extended format 


Decimal to Binary Routines 


Name Parameter Description 
mqcDEC_BIN DCB_PTR Converts decimal string 
to 80387 binary format 


mqcDECLOW _BIN ADCB_PTR Converts decimal string with low- 
level interface to binary format 


Binary to Decimal Routine 
Name Parameter Description 


mqcBIN_DECLOW ADCB_PTR Converts 80387 binary format 
value to decimal string 
with low-level interface 


Every DC387 routine begins with the prefix mqc. This prefix reduces 
the chance of conflict between a DC387 name and another name in 
your program. DC387 also has alternate PUBLIC names beginning 
with mqc for its routines. These names, listed in Appendix A, are 
used by some Intel translators. 


2-10 Decimal Conversion Library 


oO 


oO 


Oo 


To make the DC387 routines’ names more readable in this chapter, the 
mac prefix is in lowercase letters, except in examples. However, 
uppercase and lowercase names are interchangable within DC387 
library modules. 


2.2.2 How to Read the DC387 Reference Pages 


The reference pages for the DC387 routines have five sections: 


1, 


or 


Parameter describes the pointer argument to a decimal-binary 
conversion routine, along with the DCB- or ADCB-type (see 
Section 2.1.2) data structure it accesses. This section also describes 
the values allowed for each field of the structure. 


Parameters describe the pointer arguments to a binary-binary 
conversion routine, along with the floating-point data each pointer 
accesses. 


Discussion explains what the routine does, whether there are any 
additional requirements on the input data, and how the routine 
handles special input values or what results it returns for certain 
inputs, or both. 


Exceptions first summarizes which 80387 exceptions the routine 
can report. Then, it explains what causes each exception and how 
the routine handles the masked and unmasked cases. 


Exception Opcode has the hexadecimal value the routine stores in 
the Opcode field of the 80387 State if the routine generates a trap 
(see Table 2-1). 


Example has a commented ASM386 example that shows how to 
declare the routine NEAR or FAR, how to declare its pointer 
argument(s) and data, and how (in what sequence) to push its 
argument(s) on the 80386 stack before calling the routine. 


2.2.3 DC387 Reference 


The remaining pages in this chapter are a comprehensive reference for 
each Decimal Conversion Library routine. The routines are in 
alphabetic order. 
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mqcBIN DECLOW 


Converts binary number 
to decimal string with low-level interface 


Parameter 


2-12 


ADCB_PTR is either a near (32-bit offset) or a far (16-bit segment, 
32-bit offset) pointer to an Augmented Decimal Conversion Block (see 
ADCB in Section 2.1.2) in 80386 memory. The 17-byte ADCB has six 
fields containing the following variables: 


B_BUF_PTR is a 48-bit pointer to the binary input buffer. For 
DC387N.LIB, only the low-order 32 bits of B_ BUF _PTR are 
meaningful. The input buffer contains a 32-bit single, 64-bit 
double, or 80-bit extended format value. 


PRSCN is a one-byte input code that specifies whether 
B_BUF_PTR points to a single, double, or extended format 
binary number. Valid PRSCN codes are: 0 for single, 2 for 
double, and 3 for extended format. B_BUF_PTR should point to 
a number whose format matches the PRSCN code. Otherwise, 
mqcBIN_DECLOW returns undefined results to D_BUF_PTR, 
SCALE, and SIGN. 


LNGTH is a one-byte input ordinal from 0 to 255, inclusive, that 
specifies how many decimal digits mqcBIN_DECLOW will output. 
Specify at least 9 for single format or 17 for double format to 
always obtain discrete decimal strings from adjacent binary input 
values. mqcBIN_DECLOW returns only the SCALE and SIGN 
values if LNGTH is zero and B_BUF_PTR does not point to a 
negative zero, an infinity, or a NaN. 


D_BUF_PTR is a 48-bit pointer to the decimal output buffer. 
For DC387N.LIB, only the low-order 32 bits of D_BUF_PTR are 
meaningful. mqcBIN_DECLOW returns a string of ASCII decimal 
digits or special values (see Table 2-3) to the output buffer. It 
does not return an explicit decimal point. 


SCALE is an output value, a 16-bit integer in two’s complement. 
In SCALE, mqcBIN_DECLOW returns the value of the true 
base,, exponent for the digits at D_BUF_PTR. 


SIGN is a byte output in ASCII. mqcBIN_DECLOW returns + 
(2BH) for a positive input, - (2DH) for a negative input, and . 
(2EH) for a NaN input. 
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mqcBIN_DECLOW (continued) 
Discussion 


mqcBIN_DECLOW converts the binary value at B_BUF_PTR into a 
decimal representation stored at D_ BUF_PTR, SCALE, and SIGN. 
mqcBIN_DECLOW’s caller can use these values to construct the final 
output format of the number. Table 2-3 shows what 
mqcBIN_DECLOW returns for input 80387 special values. 


Table 2-3 mqcBIN_DECLOW Conversions of 80387 Special Values 


Input SIGN in SCALE in Decimal Output Buffer in 

Binary ASCII Two’s ASCII 

Value (hex) Complement (hex) 

NaN . (2EH) 32767 » (2EH) followed by blanks (20H) 
+00 + (2BH) 32767 + (2BH) followed by blanks (20H) 
—o — (2DH) 32767 — (2DH) followed by blanks (20H) 
+0 0 (30H) 0 all blanks (20H) 

-0 ; — (2DH) 0 0 (80H) followed by blanks (20H) 


mqcBIN_DECLOW returns only digits at D_BUF_PTR; an implicit 
decimal point exists after the rightmost digit. If LNGTH is greater 
than 18, mqcBIN_DECLOW fills the decimal output buffer with 18 
decimal digits, followed by ASCII underscore (5FH) characters with 
an assumed decimal point after the rightmost underscore. 


Exceptions 


Possible exceptions are Invalid, Denormal, and Precision: 


I Input -0, to, or NaN at B_BUF_PTR when the LNGTH field’s 
value is 0 causes the I exception. If I is masked, 
mgerBIN_DECLOW returns appropriate SIGN and SCALE results 
(see Table 2-3), but it does not return digits at D_ BUF_PTR. If 
I is unmasked, control passes to the exception handler with the 
input value in ST (the 80387 stack top) and the exception opcode 
set. 
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mqcBIN_DECLOW (continued) 


D Input denormals at B_BUF_PTR cause the D exception. If D is 
masked and the input is in single or double format, 
mqcBIN_DECLOW returns correct results as if for a normalized 
value in extended format. If D is masked and the input is in 
extended format, it returns results as if for a value with the same 
significand but with a biased exponent of +1 (minimum true 
exponent -16382). If D is unmasked, control passes to the 
exception handler with the input number in ST and the exception 
opcode set. 


P A result that must be rounded to fit in the destination format 
causes the P exception. If P is masked, mqcBIN_DECLOW 
returns the rounded result. If P is unmasked, control passes to the 
exception handler with the input number in ST and the exception 
opcode set. 


Exception Opcode 


D1H 
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mqcBIN_DECLOW (continued) 


This example assumes the declarations of the ADCB structure and 
named PRSCN constants as in Section 2.1.2. It does not assume the 
declaration of mqcBIN_DECLOW. 


: : ; DATA segment declared here. 
REAL_VAR3 DD OCOE9A36DR ; binary input value (const) 
D BUF3 OP ? ; for decimal output 
FINAL BUF DB 15 DUP (?) 

BLOCK3 ADCB < ?, SNGL PRSCN,9,?,?,? > 

; BLOCK3 fields initialized to: 
3 B_BUF_PTR: undefined 
s PRSCN: 32-bit single format 
; LNGTH: 9 digits 
; D BUF PTR: undefined 
; SCALE: undefined (output) 
3 SIGN: undefined (output) 


3 : 3; CODE32 segment declared. 
EXTRN MQCBIN DECLOW: NEAR 
; Assume SS and DS already point to DATA (combined 
; data/stack segment) for linkage with DC387N.LIB. 
; The following lines initialize PTR fields, set up 
3 access to BLOCK3, and call MQCBIN DECLOW. 


LEA EDX, REAL_VAR3 3 EDX := offset(REAL_VAR3) 
MOV DWORD PTR BLOCK3.B BUF PTR, EDX 
LEA EDX, D_BUF3 ; EDX := offset (D_BUF3) 


MOV DWORD PTR BLOCK3.D BUF _PTR, EDX 
LEA EDX, BLOCK3 EDX := offset (BLOCK3) 


PUSH EDX BLOCK3 access onto 
3; 80386 stack 
CALL MQCBIN DECLOW ; Convert binary to decimal. 


3 DIGITS BUFFER is now 373330313139393434H (ASCII for 
; string 730119944), SIGN is 2DH (ASCII for -), and 

; SCALE is OFF8H (-8). Use these values to construct 
3 a number in any desired format at FINAL_BUF. 
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mqcDEC BIN 


Converts decimal string 
to binary number 


Parameter oO 


DCB_PTR is either a near (32-bit offset) or a far (16-bit segment, 
32-bit offset) pointer to a Decimal Conversion Block (see DCB in 
Section 2.1.2) in 80386 memory. The 14-byte DCB has four fields 
containing the following variables: 


¢ B_BUF_PTR is a 48-bit pointer to the output binary number. 
For DC387N. LIB, only the low-order 32 bits of B_BUF_PTR are 
meaningful. The output buffer will contain a 32- ‘bit single, 64-bit 
double, or 80-bit extended format value. 


e PRSCN is a one-byte code that specifies whether B_BUF_PTR 
points to a single, double, or extended format binary number. 
Valid PRSCN codes are: 0 for single, 2 for double, and 3 for 
extended format. mqcDEC_BIN returns undefined output if 
PRSCN has any other value. 


e LNGTH is a one-byte input ordinal from | to 255, inclusive, that ie) 
specifies the number of characters to be read at D_BUF_PTR. If 
LNGTH is 0, mqcDEC_BIN returns undefined output. 


e D_BUF_PTR is a 48-bit pointer to the input string of ASCII 
decimal characters. For DC387N.LIB, only the low-order 32 bits 
of D_BUF_PTR are meaningful. The caller should verify correct 
input syntax (see the following Discussion) before calling 
mqcDEC_ BIN; it returns undefined output when given input with 
invalid syntax. 


Discussion 


mqcDEC_BIN converts the string at D_ BUF_PTR into a binary 
floating-point result in the format specified by PRSCN. It stores the 
binary value in 80386 memory at B_BUF_PTR. 


mqcDEC_ BIN decomposes the input string into a significand with at oO 
most 21 digits and an implicit decimal point after the rightmost 

nonzero digit, an adjusted exponent, and a sign. Then it calls 
mqcDECLOW_ BIN. 


2-16 Decimal Conversion Library 


Oo 


mqcDEC BIN (continued) 


The ASCII string input to mqcDEC_BIN must conform to the 
following rules: 


e The string may have trailing blank characters (20H) but not 
leading or internal blanks. 


e The initial character must be a - (2DH) for a negative input value. 
Unsigned strings are positive, so a + (2BH) is optional. 


e The immediately following characters are the significand digits: 


o There must be at least one digit (30H = 0 through 39H = 9) in 
the significand string. The significand may have leading or 
trailing zeros (30H), but mqcDEC_BIN discards them and 
passes the remaining digits to mqacDECLOW_BIN if there are 
no more than 20 digits. If more than 20 digits remain, 
mqcDEC_ BIN collects the 20 most significant digits, appends 
the least significant digit to this string, and calls 
mqcDECLOW_ BIN. 


o The decimal point (2EH) is an optional character in the 
significand string. It may be the initial, the final, or an 
internal character of the string. 


e An exponent string following the significand is optional: 


o The exponent’s initial character must be an E (45H or 65H), a 
D (44H or 64H), or a T (54H or 74H). For DC387, these 
uppercase and lowercase letters are interchangable. 


o The next character must be a - (2DH) for a negative exponent. 
An unsigned string is positive, so a + (2BH) is optional. 


o The remaining characters must be a string of at least one digit. 


e The entire input string has an upper limit of 255 characters. A 
valid string must have at least one significand digit; the minimum 
length input is one byte containing a single ASCII digit. For 
example: 


© 100.00 1E2 172 1.£2 .1E3 +100000d-3 
are all valid input strings for the value 100, provided that 
there are no leading blanks (20H) in any string. 


o £2 1 E2 l.d -e2 ~34.25 T-009 
are invalid input strings because the significand is missing (E2, 
-e2), an exponent digit is missing (1.d), or there are internal 
blanks (1 E2, -34.25 T-009). Leading blanks also make an 
input string invalid. 
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mqcDEC BIN (continued) 
Exceptions 


Possible exceptions are Overflow, Underflow, and Precision: 


O A result too large to fit in the destination format causes the O 


exception. If O is masked, mqcDEC_BIN returns a correctly 
signed infinity at B_BUF_PTR. If O is unmasked but the result 
will fit in extended format, control passes to the exception handler 
with the output—its significand rounded to the format specified 
for PRSCN—in ST (the 80387 stack top) and the exception opcode 
set. If O is unmasked and the result is too large to fit in extended 
format, control passes to the exception handler with the QNaN 
indefinite in ST and the exception opcode set. 


A result too tiny to fit accurately in the destination format causes 
the U exception if U is masked. In this case, mqcDEC_BIN 
returns a gradual underflow denormal at B_BUF_PTR. A 
normalized result too tiny to fit in the destination format causes 
the U exception if U is unmasked. If U is unmasked but the 
result can be represented in extended format, control passes to the 
exception handler with the output—its significand rounded to the 
format specified for PRSCN—in ST and the exception opcode set. 
If U is unmasked and the result cannot be represented in extended 
format, control passes to the exception handler with the QNaN 
indefinite in ST and the exception opcode set. 


A result that must be rounded to fit in the destination format 
causes the P exception. If P is masked, mqcDEC_BIN returns the 
rounded result. If P is unmasked, control passes to the exception 
handler with an extended format result in ST and the exception 
opcode set. 


Exception Opcode 
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mqcDEC BIN (continued) 
Example 


This example assumes the declarations of the DCB structure and 
named PRSCN constants as in Section 2.1.2. Exceptions are masked 
in the 80387 Control Word (see Section 2.1.6), so mqcDEC_BIN 
returns default results to REAL_ VAR if exceptions occur; it also 
returns the 80387 exception byte to the AL register (see Sections 2.1.3 
and 2.1.7). However, this example does not assume the declaration of 
mqcDEC_BIN. 
XCPTNS DBO for 80387 exception byte 
on return from MQCDEC_BIN 
D_IN BUF DB 100-DUP (?) decimal input buffer 
ACTUAL ODW 15 for length of string 
REAL_VAR DQ 0 binary output access 
BLOCKi1 DCB < ?, DUBL_PRCSN, ACTUAL, ?> 
; BLOCK1 fields initialized to: 

; B_BUF PTR: undefined 

3; PRSCN: 64-bit double format 

3 LNGTH: 15 (at assembly) 

: s ; D_BUF_PTR: undefined 

EXTRN MQCDEC BIN: NEAR ; in CODE32 segment 
ENTRY: 
; Assume that the decimal string -3.4E2 has already 
; been moved into D_IN BUF. The following lines 
; initialize BUF PTR fields, set up access to BLOCK1, 
3 and call MQCDEC_BIN in the CODE32 segment. 


we we we we we 


LEA EBX, REAL_VAR 3 EBX := offset (REAL_VAR) 
MOV DWORD PTR BLOCK1.B BUF PTR, EBX 
LEA EBX, D_IN BUF ; EBX := offset(D_IN BUF) 


MOV DWORD PTR BLOCK1.D )_BUF_PTR, EBX 
LEA EBX, BLOCK1 3 EBX := offset (BLOCK1) 
PUSH EBX 3; BLOCK1 access onto 
3; 80386 stack 
CALL MQCDEC_BIN ; 
MOV XCPTNS, AL : 


; Convert decimal to binary. 
; Store 80387 exception byte 
; in 80386 memory. 


REAL_VAR is now the 64-bit double format 
representation of -340. If the value in REAL_VAR 
is suspect, examine XCPTNS to see whether an 80387 
exception bit was set during MQCDEC BIN. 


we we we we 


Decimal Conversion Library 2-19 


mqcDECLOW BIN 
Converts decimal string 
with low-level interface 

to binary number 


Parameter 


2-20 


* 


ADCB_PTR is either a near (32-bit offset) or a far (16-bit segment, 
32-bit offset) pointer to an Alternative Decimal Conversion Block (see 
ADCB in Section 2.1.2) in 80386 memory. The 17-byte ADCB has six 
fields containing the following variables: ; 


B_BUF_PTR is a 48-bit pointer to the output binary number. 
For DC387N.LIB, only the low-order 32 bits of B_BUF_PTR are 
meaningful. The output buffer will contain a 32-bit single, 64-bit 
double, or 80-bit extended format value. 


PRSCN is a one-byte code that specifies whether B_BUF_PTR 

points to a single, double, or extended format binary number. 

Valid PRSCN codes are: 0 for single, 2 for double, and 3 for 

extended format. mqcDECLOW_BIN returns undefined output if 
PRSCN has any other value. ae) 


LNGTH is a one-byte input ordinal from 1 to 21, inclusive, that 
specifies the number of significand digits to be read at 
D_BUF_PTR. It is mathematically impossible to map certain 
adjacent input strings to discrete binary values when both strings 
are longer than 6 digits for single, 15 for double, or 18 for 
extended format. If LNGTH less than | or greater than 21, 
mqcDECLOW_ BIN returns undefined output. 


D_BUF_PTR is a 48-bit pointer to the input ASCII string of 
decimal digits (30H through 39H). For DC387N.LIB, only the 
low-order 32 bits of D_BUF_PTR are meaningful. The input 
digits represent the significand as an integer without leading or 
trailing zeros and with an implicit decimal point after the 
rightmost digit. Adjust the exponent value to place the implicit 
decimal point correctly, store the adjusted exponent in SCALE, 
and store the sign in SIGN before calling mqcDECLOW_BIN. 


SCALE is a 16-bit integer, expressed in two’s complement. The OQ 
SCALE value specifies the true base,, exponent for the 
significand digits at D_BUF_PTR. 


SIGN is an input byte value in ASCII, either + (2BH) or - (2DH). 
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mqcDECLOW BIN (continued) 
Discussion 


mqcDECLOW_BIN accepts a pointer to a decimal number that has 
already been converted from some other format to the low-level 
format described under D_BUF_PTR, SCALE, and SIGN in the 
Parameter section. It converts the number into a binary floating- 
point number in the format specified by PRSCN and stores its result 
at B_BUF_PTR. mqcDECLOW_BIN converts at most 20 digits in 
the significand string; it interprets a 2]-digit string as a value that 
must be rounded. The twenty-first digit, if any, must be the least 
significant nonzero digit of a significand with more than 20 digits. 


Exceptions 


Possible exceptions are Overflow, Underflow, and Precision: 


O A result too large to fit in the destination format causes the O 
exception. If O is masked, mqcDECLOW_BIN returns a correctly 
signed infinity at B_BUF_PTR. If O is unmasked but the result 
will fit in extended format, control passes to the exception handler 
with the output—its significand rounded to the format specified 
for PRSCN— in ST (the 80387 stack top) and the exception opcode 
set. If O is unmasked and the result is too large to fit in extended 
format, control passes to the exception handler with the QNaN 
indefinite in ST and the exception opcode set. 


U A result too tiny to fit accurately in the destination format causes 
the U exception if U is masked. In this case, mqcDECLOW_BIN 
returns a gradual underflow denormal at B_BUF_PTR. A 
normalized result too tiny to fit in the destination format causes 
the U exception if U is unmasked. If U is unmasked but the 
result can be represented in extended format, control passes to the 
exception handler with the output—its significand rounded to the 
format specified for PRSCN—in ST and the exception opcode set. 
If U is unmasked and the result cannot be represented in extended 
format, control passes to the exception handler with the QNaN 
indefinite in ST and the exception opcode set. 


P A result that must be rounded to fit in the destination format 
causes the P exception. If P is masked, mqcDECLOW_BIN 
returns the rounded result. If P is unmasked, control passes to the 
exception handler with an extended format result in ST and the 
exception opcode set. 
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mqcDECLOW BIN (continued) 
Exception Opcode 


DOH 


Example . oO 


This example assumes definition of the named PRSCN constants as in 
Section 2.1.2. It does not assume the definition of the ADCB 
structure or of mgcDECLOW_BIN. 


EXTRN MQCDECLOW BIN: FAR 
3; declared outside all SEGMENT..ENDS 
3; in module 


DECOMPOSED DEC_INPUT SEGMENT RW USE32 
EXP1 DW -2 
SIGN1 DB '+' 
SIG_DIGITS1 DB 15 ; for length of string 
D BUF1 DB '371852946173258' 
DECOMPOSED DEC_INPUT ENDS 


BINARY OUTPUT SEGMENT RW USE32 oO 
DUBL_ REAL1 DQ ? ; binary output 
BINARY | OUTPUT ENDS 


CONVERT _TO DUBL SEGMENT ER USE32 


O_XCPTN EQU 00001000B ; for exception masks 
U_XCPTN EQU 000100008 3 of mqcDECLOW BIN's 
P_XCPTN EQU 00100000B 3; possible exceptions 


; DUBL_FROM DCOMP routine can be called from another 
; module where it has been declared EXTRN. It saves 
; data segment registers, sets up a stack frame for 
; ADCB data from 2 segments, and calls MQCDECLOW BIN. 
; DUBL_FROM DCOMP also checks for exceptions that 

3 occurred during MQCDECLOW BIN's conversion. 


DUBL_FROM_DCOMP PROC FART oO 
PUSH DS ; 4-byte pushes of DS and ES 
PUSH ES : in USE32 segments 
PUSH EBP 


MOV EBP,ESP 
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mqcDECLOW BIN (continued) 


PUSH AX ; Dummy push aligns stack on 4-byte 
; boundary before call to MQCDECLOW BIN. 
MOV AX, DECOMPOSED _DEC_INPUT 
MOV DS, AX 
ASSUME DS: DECOMPOSED _DEC_INPUT 
; Begin setup of ADCB on stack. 
PUSH DWORD PTR EXP1 


PUSH AX 3 AX=16-bit_segment(D BUF PTR) 
LEA ESI, D_BUF1 ; ESI := offset(D BUF PTR) 
PUSH ESI 


MOV AH, SIG _DIGITS1 
MOV AL, DUBL_PRSCN 


PUSH AX 3; LNGTH and PRSCN onto stack 
MOV AX, BINARY OUTPUT 

PUSH AX 3 AX=16-bit_segment(B_BUF_PTR) 
MOV ES, AX 


ASSUME ES: BINARY OUTPUT 
LEA EDI DUBL_REAL1 ; EDI := offset(B_BUF_PTR) 
PUSH EDI 
; Now ADCB data structure is on stack. 
MOV EAX, ESP 
PUSH SS 3 segment (ADCB PTR) 
PUSH EAX 3 offset (ADCB_PTR) 
CALL MQCDECLOW BIN 
3 also returns 80387 exception byte to AL register 
TEST AL, O_XCPTN + U_XCPTN + P_XCPTIN 
JNZ XCPTN_REVIEW 


EXIT: 3 DUBL_FROM_DCOMP 
MOV ESP, EBP ; MQCDECLOW BIN preserves EBP. 
POP ES 
POP DS 
RET 


XCPTN_REVIEW: 
; Code to make note of exceptions that 
3; occurred in conversion goes here. 


JMP EXIT 
DUBL_FROM DCOMP ENDP 


CONVERT TO DUBL ENDS 
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mgqcDUBL_XTND 
Converts number in double format 
to same value in extended format 


Parameters oO 


DUBL_ PTR is either a near (32-bit offset) or a far (16-bit segment, 
32-bit offset) pointer to the input binary number in 80386 memory. 
If the input is not in 64-bit double format, macDUBL_XTND 
returns undefined output at XTND_PTR. 


XTND_PTR is either a near (32-bit offset) or a far (16-bit segment, 
32-bit offset) pointer to the binary output buffer. 


Discussion 


mqcDUBL_XTND converts a binary floating-point value in 64-bit 
double format to the same value in 80-bit extended format. 


Exception a) 
D Input denormals cause the D exception. If D is masked, 
mqcDUBL_XTND returns the input value—normalized in 
extended format—at XTND_PTR. If D is unmasked, control 
passes to the exception handler with the input—normalized in 
extended format—in ST (the 80387 stack top) and the exception 
opcode set. 


Exception Opcode 


D4H 


*) 
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Example 


mqcDUBL_XTND (continued) 


This example assumes that mqcDUBL_XTND has not been declared. 


a) EXTRN MQCDUBL_XTND: FAR 


3; declared outside all SEGMENT. .ENDS 
3; in module 

; Module's stack allocated and 

; data segments declared here. 


DUBL_NUM DQ ? ; 64-bit input 
XTND_NUM DT ? ; 80-bit output 


: 3; SOMECODE USE32 segment declared here. 
; Assume SS points to stack and DS contains the 16-bit 
3 segment part of far pointers to DUBL_NUM 


3 and XTND_NUM. The following lines convert the 
3; double format number at DUBL_NUM to an extended 
; format number stored at XTND_NUM. 


PUSH DS ; segment (DUBL_NUM) onto 80386 
oO 3 stack (4-byte push) 

LEA EDX, DUBL_NUM 3 EDX := offset (DUBL_NUM) 

PUSH EDX ; DUBL_NUM offset onto stack 

PUSH DS 3 segment (XTND NUM) onto stack 

LEA EDX, XTND_NUM 3; EDX := offset (XTND_NUM) 

PUSH EDX ; XTND_NUM offset onto stack 


CALL MQCDUBL_XTND 


3 XTND_NUM now contains the same value as DUBL_NUM. 


Oo 
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mqcSNGL XTND 
Converts number in single format 
to same value in extended format 


Parameters oO 


SNGL_PTR is either a near (32-bit offset) or a far (16-bit segment, 
32-bit offset) pointer to the input binary number in 80386 memory. 
If the input is not in 32-bit single format, mqcSNGL_XTND returns 
undefined output at XTND_PTR. 


XTND_PTR is either a near (32-bit offset) or a far (16-bit segment, 
32-bit offset) pointer to the binary output buffer. 


Discussion 


mqcSNGL_XTND converts a binary floating-point value in 32-bit 
single format to the same value in 80-bit extended format. 


Exception oO 
D Input denormals cause the D exception. If D is masked, 
maqcSNGL_XTND returns the input value—normalized in 
extended format—at XTND_PTR. If D is unmasked, control 
passes to the exception handler with the input—normalized in 
extended format—in ST (the 80387 stack top) and the exception 
opcode set. 


Exception Opcode 


D2H 


* 
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mqcSNGL_XTND (continued) 
Example 


This example assumes that mqacSNGL_XTND has not been declared. 


ie) : : ; DATA segment declared here. 
SNGL_X DD ? 3 32-bit input 
XTND_X DT ? 3 80-bit output 


: : ; CODE32 segment declared. 
EXTRN MQCSNGL_XTND: NEAR 
; Assume DS and SS point to DATA (combined data/stack 
3 segment) where SNGL_X and XTND_X are declared. 
3; The following lines convert the single format 
3 number at SNGL_X to an extended format number 
; stored at XTND X. 


LEA EAX, SNGL_X ; EAX := offset (SNGL_X) 
PUSH EAX SNGL_X offset 

onto 80386 stack 

EAX := offset (XTND_X) 


LEA EAX, XTND_X 
XTND_X offset onto stack 


PUSH EAX 
@) CALL MQCSNGL_XTND 


; XTND_X now contains the same value as SNGL X. 


we es we we we 


$ 
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mqcXTND DUBL 


Converts number in extended format 
to same value in double format 


Parameters oO 


XTND_PTR is either a near (32-bit offset) or a far (16-bit segment, 
32-bit offset) pointer to the input binary number in 80386 memory. 
If the input is not in 80-bit extended format, mqcXTND_DUBL 
returns undefined output at DUBL_PTR. 


DUBL_PTR is either a near (32-bit offset) or a far (16-bit segment, 
32-bit offset) pointer to the binary output buffer. 


Discussion 


maqcXTND_DUBL converts a binary floating-point number in 80-bit 
extended format into the nearest number in 64-bit double format. 
mqcXTND_DUBL rounds the input to the nearest value representable 

in double format, rounding to even if two double format values are 

equally near. ie) 


For the input 80387 special values to and +0, mqcXTND_DUBL 
returns equivalent representations in double format. For input NaNs, 
it truncates the least significant digits of the exponent (11..1) and 
significand to fit into double format, provided that all truncated 
significand digits are zeros. 


Exceptions 


Possible exceptions are Invalid, Overflow, Underflow, and Precision: 


I An input NaN whose significand bits to be truncated are not all 
zero causes the I exception. If I is masked, mqcXTND_DUBL 
returns its truncated result at DUBL_PTR if the truncated 
significand would be nonzero; when the truncated significand 
would be zero, it makes the result’s significand nonzero by 
substituting the highest nonzero byte of the original significand 
into bits 5 through 12 of the significand at DUBL_PTR. If I is 
unmasked, control passes to the exception handler with the input 
in ST (the 80387 stack top) and the exception opcode set. 


\ 
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mqcXTND_DUBL (continued) 


O An input exponent too large to fit in the double format exponent 
field causes the O exception. If O is masked, mqcXTND_DUBL 
returns +~ at DUBL_PTR. If O is unmasked, control passes to 
the exception handler with the input value—its exponent 
unchanged but its significand rounded to double format—in ST 

*) and the exception opcode set. 


U A result too tiny to fit accurately in double format causes the U 
exception if U is masked. In this case, mqacXTND_DUBL returns 
a gradual underflow denormal—rounded to fit in double format— 
at DUBL_PTR. A result too tiny to be represented as a 
normalized double format number causes the U exception if U is 
unmasked. In this case, control passes to the exception handler 
with the input value—its exponent unchanged but its significand 
rounded to double format—in ST and the exception opcode set. 


P_ A result whose significand must be rounded to fit in double 
format causes the P exception. If P is masked, mqcXTND_DUBL 
returns the rounded result at DUBL_PTR. If P is unmasked, 
control passes to the exception handler with the input in ST and 
the exception opcode set. 


Oo Exception Opcode 
D5H 
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mqcXTND_DUBL (continued) 
Example 


2-30 


This example assumes that mqcXTND_DUBL has not been declared. 


EXTRN MQCXTND | DUBL: FAR 
3; declared outside all SEGMENT. .ENDS 
3; in module 
; Module's stack bytes allocated and 
3; data segments declared here. 
XTND_ARY DT 8 DUP (7) ; 80-bit inputs 
DVBL_ARY DQ 8 DUP (?) ; 64-bit outputs 


3 SOMECODE USE32 segment declared here. 
; hevuae ss points to stack and DS points to 
; segment where XTND ARY and DUBL_ARY declared. 
; The following lines convert extended format values 
3 at XTND_ARY to double format values at DUBL_ARY. 


LEA EBX, DUBL_ARY 3 EBX := offset (DUBL_ARY) 

LEA EDX, XTND_ARY 3 EDX := offset(XTND_ARY) 

MOV ECX, 8 s ECX := 8 (LOOP count reg) 

LOOP8: 3; label 

PUSH ECX 3; Save loop counter. 

PUSH EBX 3 Save offset(DUBL_ARY(n)). 

PUSH EDX 3 Save offset(XTND ARY(n)). 

PUSH DS 3 segment(XTND ARY) onto 80386 
3 stack (4-byte push) 

PUSH EDX ; XTND_ARY offset onto stack 

PUSH DS 3 segment (DUBL_ARY) onto stack 

PUSH EBX ; DUBL_ARY offset onto stack 


CALL MQCXTND_DUBL 
3; ESP now points to saved XTND ARY offset. 
POP EDX ; Restore XTND | ARY(n) offset. 


ADD EDX, 10 ; EDX := offset(XTND ARY(n+1)) 
POP EBX ; Restore DUBL_ARY(n) offset. 

ADD EBX, 8 ; EBX := offset (DUBL_ARY(n+1)) 
POP ECX ; Restore counter. 

LOOP LOOP8 ; Decrement count in ECX. 


Jump to LOOP8 if ECX not 0. 


; DUBL_ARY(0) through DUBL_ARY(7) contain rounded 
3 copies of XTND_ARY(0) through XTND | ARY (7). 
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mqcXTND SNGL 
Converts number in extended format 
to same value in single format 


oO Parameters 


oO 


Oo 


XTND_PTR is either a near (32-bit offset) or a far (16-bit segment, 
32-bit offset) pointer to the input binary number in 80386 memory. 
If the input is not in 80-bit extended format, mqcXTND_SNGL 
returns undefined output at SNGL_ PTR. 


SNGL_ PTR is either a near (32-bit offset) or a far (16-bit segment, 
32-bit offset) pointer to the binary output buffer. 


Discussion 


mqcXTND_SNGL converts a binary floating-point number in 80-bit 
extended format into the nearest number in 32-bit single format. 
mqcXTND_SNGL rounds the input to the nearest value representable 
in single format, rounding to even if two single format values are 
equally near. 


For the input 80387 special values t~ and +0, mqcXTND_SNGL 
returns equivalent representations in single format. For input NaNs, 
it truncates the least significant digits of the exponent (11..1) and 
significand to fit into single format, provided that all truncated 
significand digits are zeros. 


Exceptions 


Possible exceptions are Invalid, Overflow, Underflow, and Precision: 


I An input NaN whose significand bits to be truncated are not all 
zero causes the I exception. If I is masked, macXTND_SNGL 
returns its truncated result at SNGL_PTR if the truncated 
significand would be nonzero; when the truncated significand 
would be zero, it makes the result’s significand nonzero by 
substituting the highest nonzero byte of the original significand 
into bits 0 through 7 of the significand at SNGL_PTR. If I is 
unmasked, control passes to the exception handler with the input 
in ST (the 80387 stack top) and the exception opcode set. 
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mqcXTND_SNGL (continued) 


O An input exponent too large to fit in the single format exponent 
field causes the O exception. If O is masked, mqcXTND_SNGL 
returns +~ at SNGL_ PTR. If O is unmasked, control passes to 
the exception handler with the input value—its exponent 
unchanged but its significand rounded to single format—in ST oO 
and the exception opcode set. 


U A result too tiny to fit accurately in single format causes the U 
exception if U is masked. In this case, mqacXTND_SNGL returns 
a gradual underflow denormal—rounded to fit in single format— 
at SNGL_PTR. A result too tiny to be represented as a 
normalized single format number causes the U exception if U is 
unmasked. In this case, control passes to the exception handler 
with the input value—its exponent unchanged but its significand 
rounded to single format—in ST and the exception opcode set. 


P A result whose significand must be rounded to fit in single format 
causes the P exception. If P is masked, mqcXTND_SNGL returns 
the rounded result at SNGL_PTR. If P is unmasked, control 
passes to the exception handler with the input in ST and the 
exception opcode set. 


Exception Opcode #) 
D3H 
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mqcXTND_SNGL (continued) 
Example 


This example assumes that mqcXTND_SNGL has not been declared. 
However, it assumes that exceptions are masked in the 80387 Control 
oO Word (see Section 2.1.6), so mqcXTND_SNGL returns default results 
to SNGL_VAR if exceptions occur; it also returns the 80387 
exception byte to the AL register (see Sections 2.1.3 and 2.1.7). 


: ; DATA segment declared here. 
XTND_VAR DT ? ; 80-bit input 
SNGL_VAR DD ? 3 32-bit output 
XCPTNS DB 0 ; for 80387 exception byte 
3 on return from MQCXTND SNGL 


: : ; CODE32 segment declared. 
EXTRN MQCXTND SNGL: NEAR 

3 Assume DS and SS point to DATA (combined data/stack 
3 segment) where XTND_VAR and SNGL_VAR are declared. 
3; The following lines convert the extended format 
3 number at XTND_VAR to a single format number 
3 stored at SNGL VAR. 


LEA EDX, XTND VAR ; EDX := offset(XTND_VAR) 
PUSH EDX XTND_VAR offset onto 
80386 stack 


LEA EDX, SNGL_VAR EDX := offset(SNGL_VAR) 


we we we ve ww 


PUSH EDX SNGL_VAR offset onto stack 
CALL MQCXTND SNGL : 
MOV XCPTNS, AL 3 Store 80387 exception byte 


; in 80386 memory. 


SNGL_VAR contains a rounded copy of the value at 
XTND VAR or a default result if exceptions occurred 
during MQCXTND_SNGL's conversion. If the value in 
SNGL_VAR is suspect, examine XCPTNS to see whether 
an 80387 exception bit was set (or which bit was 
set) during MQCXTND_SNGL. 


we we we we we we 
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Chapter 3 


Common Elementary Function Library 


This chapter has three major sections: 


1. 


An overview of the 80387 Common Elementary Function Library 
(CL387) 


2. A reference for the CL387 real functions 


3. A reference for the CL387 complex functions 


3.1 Library Overview 


The 80386-based 80387 Common Elementary Function Library 
consists of routines that return floating-point values. These functions 
can be linked with the OMF386 output of any Intel translator to 
execute on an 80387 or on an 80386 with a true software emulator. 


CL387 library code is in ASM386 assembly language. CL387 extends . 
the set of functions provided by the 80387 both by adding functions 
and by allowing a wider range of input values for ASM386 floating- 
point instructions that it duplicates. 


The following subsections explain: 


How to declare CL387 routines in ASM386 programs 


How much space the CL387 libraries need on the 80387 and 80386 
stacks 


How CL387 uses the 80386 registers 


How the 80387 Control Word affects the CL387 routines and vice 
versa 


How CL387 detects, responds to, and reports 80387 exceptions 
How CL387 real functions differ from CL387 complex functions 


3.1.1 Declaring CL387 Routines in ASM386 Programs 


The Common Elementary Function Library can be linked to code that 
is within the same code segment or to code that is in another code 
segment. However, you must declare each CL387 routine that your 
program calls within each calling module. For example, within a 
module that calls mqerTAN, make one of the following declarations: 


e If you want your code to be within the same segment as CL387, 
use the CL387N.LIB (near library). Declare mqerTAN as follows 
before calling this function: 


CODE32 SEGMENT ER 3; Segment name must be CODE32. 
; CL387 segments are USE32. 
EXTRN MQERTAN: NEAR 3 MQERTAN is now callable. 


CODE32 ENDS 


e If you want your code to be in a different segment from CL387, 
use the CL387F.LIB (far library). Declare mqerTAN as follows 
before calling this function: 


EXTRN MQERTAN: FAR 3; Declaration must be 
3; outside all SEGMENT. .ENDS 
; pairs of the module. 
3; MQERTAN is now callable. 


Declare only those CL387 routines that each module calls and link to 
the appropriate CL387N.LIB or CL387F.LIB file before executing the 
program. CL387N.LIB has a single combined data/stack segment 
named DATA. All CL387 library modules use 32-bit addressing. See 
the reference pages in Sections 3.2.3 and 3.3.4 for ASM386 examples 
of how to declare each CL387 routine. See Appendix B for more 
information about declaring CL387 routines in high-level language 
modules. : 


3.1.2 CL387 Stack Requirements 


Most CL387 functions find their arguments and return results on the 
80387 stack. Some functions also use the 80386 stack and registers. 
Sections 3.2.3 and 3.3.4 contain function-specific information about 
CL387 arguments and results. 
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3.1.2.1 80387 Stack Requirements 


CL387 requires at most four contiguous 80387 stack positions 
(registers) as working space and to hold arguments to its functions. 
For example, a complex function such as mqerCMUL requires the real 
and imaginary components of its arguments to be in the 80387 stack 
positions denoted by ST (stack top), ST(1), ST(2), and ST(3) (first- 
pushed argument). Therefore, ST(4), ST(5), ST(6), and ST(7) must be 
empty in order to push mqerCMUL’s arguments without causing a 


stack overflow exception. 


CL387 functions pop arguments and intermediate results from the 
80387 stack before returning control to the caller. CL387 functions 
that return results to the 80387 stack leave only their results. All 
CL387 functions are completely reentrant: they use no fixed 80386 
memory locations to store internal variables. However, any procedure 
that interrupts CL387 should save the entire 80387 stack because the 
stack elements a CL387 function is currently using cannot be 
identified. 


i) 3.1.2.2 80386 Stack Requirements 


*) 


CL387N.LIB requires 224 bytes on the 80386 stack for its internal 
storage; CL387F.LIB requires 256 bytes. CL387 itself allocates the 
required stack bytes within its modules. However, a program such as 
a numeric exception handler could interrupt CL387 and then call 
CL387 again. If this occurs, the exception handler should allocate an 
additional 224 (near library) or 256 (far library) bytes on the 80386 
stack at each recursion. 


3.1.3 CL387 Register Usage 


CL387 conforms to the register-saving conventions of Intel 80386 
high-level languages. According to these conventions: 


¢ The CL387 functions must leave the 80386 DS, ES, SS, and EBP 
registers unchanged. In fact, all CL387 functions except mqerYIS 
and mgerCIS also leave ESP unchanged. For CL387N.LIB, ES is 
assumed to access the same segment (DATA) as DS. 


e The CL387 functions may destroy the contents of the EAX, EBX, 
ECX, EDX, EDI, ESI, FS, and GS registers. 
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3.1.4 80387 Control Word Settings 


All CL387 functions save the 80387 Control Word upon entry and 
restore it upon exit. 


All CL387 functions except mqerDIM compute results using the 80387 a) 
extended precision mode (64-bit significand) and changing the 

rounding mode as required by particular functions. For most 

functions, CL387 uses the 80387 default rounding mode: round to 

nearest with even preferred. maqerDIM uses the precision and 

rounding modes that are in effect when this function is called. 


Programs that trap on the 80387 Precision (inexact) exception should 
set the 80387 precision mask before calling most CL387 functions; 
they should clear both the mask and its corresponding status bit to 
reinstate the trap after the call. A set precision bit can be a false 
positive for all but the following CL387 functions: 


e maerIAX, mgerIA2, mqerIA4, mqerIA8, mqerIEX, mqerlE2, 
maerlIE4, mqerIE8, mqerICX, maqerIC2, mqerIC4, mqerIC8 


e mqgaerDIM 
e mqaqerMOD, mgerRMD, mqerMAX, mqerMIN, mqerSGN ae) 


The CL387 functions mqerIAX through mqerIC8 convert real numbers 
to integer values. A set precision bit is a true positive for these 
functions and for mgerDIM: P = | indicates that CL387 could not 
round or truncate a result to its nearest integer exactly. The CL387 
functions mqerMOD through mqerSGN always return exact results. 


CL387 constrains the use only of the precision mask. All other 80387 
masks can be set according to the needs of your program. 

3.1.5 CL387 Numeric Exceptions 
CL387 functions signal the same numeric exceptions as the 80387 
instructions. CL387 functions report exceptions by setting the 


appropriate bits in the 80387 exception byte. Figure 3-1 illustrates oO 
this low-order byte of the 80387’s Status Word. 
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Bits: 


Figure 3-1 80387 Exception Byte for CL387 


The CL387 functions behave like atomic instructions in detecting, 
responding to, and reporting the I, D, Z, O, and U numeric 
exceptions: 


I CL387 signals the Invalid Operation exception for such 
programming errors as: 


e Input arguments that are outside the domain of a function 


e Input arguments in 80387 unsupported formats (pseudozeros, 
psuedo-NaNs, pseudoinfinities, and unnormals) 


e Not enough 80387 stack space for the function to execute (see 
Section 3.1.2.1). This exception also sets S (bit 6). 


D CL387 signals the Denormal exception for one or more denormal 
arguments. 


Z CL387 signals the Zerodivide exception when an operation on 
finite operands will produce, without overflow, an infinite result. 


O CL387 signals the numeric Overflow exception when the exponent 
of a rounded result is too large for the format of the destination. 


U_ CL387 signals the numeric Underflow exception when a result is 
too tiny to be represented accurately in the destination format if 
underflow is masked. It signals the Underflow exception when 
the absolute value of a result is less than the smallest positive 
normalized number if underflow is unmasked. 


A CL387 function does not report its constituent instructions’ I, D, Z, 
O, and U exceptions unless it should report the exceptions for 
particular arguments. For example, suppose masked numeric overflow 
occurs during an intermediate calculation and the resulting infinity 
becomes the divisor in a subsequent operation, producing a quotient 
of 0. Such a quotient could be a final result that is quite valid for a 
particular CL387 function applied to particular arguments. This 
function will suppress the O exception arising from its intermediate 
operation on these arguments. 
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CL387 functions report the other 80387 exceptions as follows: 


P For functions that convert floating-point numbers to integers and 
mqerDIM, CL387 signals the Precision exception when it cannot 
return an exact result (see Section 3.1.4). 


S CL387 signals a Stack overflow/underflow exception when there is 
not enough 80387 stack space for the function to operate (see 
Section 3.1.2.1). The I bit is also set when S is set. 


E CL387 sets the Exception status bit (7) if it sets any of the I, D, 
Z, O, U, and P bits (0..5) of the 80387 exception byte (see Figure 
3-1). 


3.1.5.1 CL387 Masked Exception Handling 


CL387 responds to masked exceptions just as the 80387 does. It sets 
the appropriate bit of the 80387 exception byte and supplies a default 
result. See each function in Sections 3.2.3 and 3.3.4 for specific 
information about default results for masked exceptions. 


3.1.5.2 CL387 Unmasked Exception Handling 


CL387 provides exception handling information in the same data 
structure that the 80387 uses for handling unmasked exceptions: the 
80387 State. 


When an unmasked exception generates an Interrupt 16 (Processor 
Extension Error) from a CL387 function, the interrupt comes from a 
CL387 code site where cleanup of the 80386 stack is about to occur 
just before CL387’s return to its caller. When an exception handler 
for the Processor Extension Error executes its IRETD, the return is to 
this cleanup section. The CL387 routine then returns control to its 
caller, 


At the time of such a trap from CL387, the 80387 State consists of 
the 80387 Environment and 80387 stack information summarized in 
Table 3-1. 
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Table 3-1 80387 State at CL387 Trap 


Field Contains 
Control Word caller's Control Word 
Oo Status Word (caller's Status Word OR CL387 exceptions) 

Tag Word 80387 stack, as shown (see ST..ST(7) following) 

EIP Offset FFFFFFFFH for USE32 protected mode 

or Instruction Pointer © FFFFFFFFH for USE32 real address mode 

Opcode (((m + n) * 256) + CL387 function’s exception opcode) 
where m is one less than the number of function results 


nis the number of arguments (1 or 2) 


ST argument to CL387 function 
ST(1) argument (functions with 2 or more arguments) 
ST(2) argument (functions with 3 or more arguments) 
ST(8) argument (functions with 4 arguments) 

oO ST(4)..ST(7) (inherited from CL387 function’s caller) 


An exception handler for the Processor Extension Error can examine 
the 80387 Instruction Pointer or EIP Offset value to determine when 
CL387 generates an Interrupt 16. It can identify which CL387 
function caused the interrupt by examining the Opcode field value 
(see Table 3-1). 


CL387 functions handle all unmasked I, D, Z, O, and U exceptions as 
before-calculation errors: the original arguments are present on the 
80387 stack at the time of the trap. 


CL387 functions handle the unmasked P exception as an after- 


calculation error: the result of rounding its input real arguments is on 
the 80387 stack at the time of the trap. However, input arguments 


Oo are not preserved. 
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3.1.6 CL387 Real and Complex Functions 


The Common Elementary Function Library has two basic kinds of 


functions: 

Real Functions accept real arguments and return real results 
or integer results that are converted reals. 

Complex Functions accept complex arguments and return complex 


or real results. 


Every CL387 real function begins with the prefix mqer. Every 
CL387 complex function begins with the prefix mqerC. The mgaer 
prefix reduces the chance of conflict between a CL387 name and 
another name in your program. CL387 also has alternate PUBLIC 
names beginning with mqer for its routines. These names, listed in 
Appendix A, are used by some Intel translators. 


To make function names more readable in this chapter, the mqer 
prefix is in lowercase letters, except in examples. However, uppercase 
and lowercase function names are interchangable within CL387 library 
modules. 


3.1.6.1 Special Values 


CL387 treats the special values +0, +0, and NaN (Not a Number) in 
the same manner as the 80387: 


e +0 = -0 and square_root(-0) = -0. The value zero is signed only 
for real and decimal integer formats. When a sum or difference 
of two operands with differing signs is exactly zero, all CL386 
functions return +0 except for one function: mqerDIM returns -0 
if the 80387 rounding mode is round down. 


e -« < (any finite number) < +”. The value infinity exists only for 
real formats. Infinity arithmetic is always exact, and the CL387 
functions signal the Invalid exception only when an infinity 
argument is invalid for a particular function. 


e NaNs are either signaling (SNaN) or quiet (QNaN). CL387 
functions always report the Invalid exception for input SNaNs. 
They return QNaN indefinite results.in the destination format for 
the Invalid exception when I is masked. 
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See Appendix D for the zero, infinity, and QNaN values in the 80387 
formats used by CL387. 


3.1.6.2. Machine Pi 


o True m is a transcendental number; it cannot be represented exactly by 
any rational number. Therefore, true m cannot be represented exactly 
in any floating-point format specified by the IEEE754 standard. It is 
possible to represent a only as accurately as a particular format will 
allow, rounded according to the current 80387 rounding mode. 


However, no such value equals the 80387’s machine_pi that is used in 
all 80387 and CL387 trigonometric calculations. The 80387 
machine_pi has a 67-bit significand, while 80-bit extended format 
has a 64-bit significand. With machine_pi, the 80387 trigonometric 
instructions produce extended format results that are accurate to 64 
bits of precision. So do their CL387 extensions. 


You might not get the period you expect for 80387 or CL387 
trigonometric operations. For example, an extended format argument 
to FPTAN or mqerTAN will never be an exact odd multiple of 

#) machine_pi/2. Therefore, FPTAN or mgerTAN never returns 
undefined results for the tangent function’s asymptotes. 


3.2 CL387 Real Functions 


The real functions are a subset of the Common Elementary Function 
Library. This section contains: : 


e A summary of the CL387 real functions 
e Information about how to read each function’s reference pages 


e A comprehensive reference for each CL387 real function in 
alphanumeric order 


oO 
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3.2.1 Summary of CL387 Real Functions 


Table 3-2 summarizes the CL387 real functions. 


Table 3-2 Common Elementary Real Functions oO 
Compute Logarithms and Exponentials: 

Name Function Description 

mgerLGD log, (x) Common logarithm 

mgerLGE __In(x) Natural (base e) logarithm 

mqerEXP e* Exponential function 

mqgerY2X  y*ory j Raises y to real or integer power 

maerYIS y j Raises y to power of 32-bit integer on 

: 80386 stack 

mqerY12 y Raises y to power of 16-bit integer in AX 

mqaerYl4 y : Raises y to power of 32-bit integer in EAX 

mqaerYI8 y/ Raises y to power of 64-bit integer in 
EDX_EAX 

Compute Trigonometrics and Hyperbolics: we) 

Name Function Description 

mqerSIN sin@) Trigonometric sine 

mgerCOS __—cos(@) Trigonometric cosine 

mgerTAN _ tan(?) Trigonometric tangent 

mgerASN _ Arcsin(x) Trigonometric inverse sine’s principal 
value 

mgqerACS — Arccos(x) Trigonometric inverse cosine’s principal 
value 

mqerATN — Arctan(x) Trigonometric inverse tangent’s principal 
value 

mgerSNH _ sinh(?) Hyperbolic sine 

mgerCSH _cosh(¢) , Hyperbolic cosine 

mqerTNH _ tanh() Hyperbolic tangent 


oO 
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Table 3-2 Common Elementary Real Functions (continued) 


Convert Reals to Integers: 


Name_ Function 
maerlAX roundaway(x) 
mqerlA2 roundaway(x) 
maerlA4 roundaway(x) 
mgerlA8 roundaway(x) 
maerlEX roundeven(x) 
maerlE2 roundeven(x) 
mqerlE4 roundeven(x) 
maerlE8 roundeven(x) 
mgeriCX — chop(x) 
mqaerlC2 chop(x) 
mqerlC4 chop(x) 
mqeriCs chop(x) 
Return Other Values: 
Name Function 
mqerMOD xMODy 
mqerRMD xREMy 
mqerMAX maxx, y) 
mqerMIN — min(x, y) 
maerDIM ~=—max(x- y, +0) 
mqerSGN | x | with y’s sign 


Common Elementary Function Library 


Description 


Rounds x to nearest integer; rounds away 
from 0 if two integers are equally near 
Rounds x to 16-bit integer like mqerlAX 
Rounds x to 32-bit integer like mqerlAX 
Rounds x like to 64-bit integer like 
mqaerlAX 

Rounds x to nearest integer; rounds to 
even if two integers are equally near 
Rounds x to nearest 16-bit integer like 
maerlEX 

Rounds x to nearest 32-bit integer like 
mqaerlEX 

Rounds x to nearest 64-bit integer like 
maerlEX 

Truncates x to integer 

Truncates x to 16-bit integer 

Truncates x to 32-bit integer 

Truncates x to 64-bit integer 


Description 


Modulus retaining sign of x 

Remainder, rounding to nearest with even 
preferred 

Greater of x or y 

Lesser of x or y 

Positive difference 

Combines magnitude of x with sign of y 
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3.2.2 How to Read the Real Function Reference Pages 


The reference pages for each CL387 real function have five sections: 


function in two different ways. The first line uses 80387 stack 
position notation. Subsequent lines use mathematical notation. 


For example, ST := ST(1)°" indicates that a real input in ST(1) is 
raised to the power of a second real input in ST, and that the real 
result is left in ST. 


1. Function summarizes the result and input arguments for each a) 


The second line uses Result, y, and x to indicate the same thing 
mathematically, as Result := y*. This line and subsequent lines 
sometimes summarize restrictions on input values or further define 
the function. 


2. Discussion explains the function in more detail, including how it 
handles the special values +- and +0. This section uses the 
mathematical notation of the Function section. Ranges expressed 
as a..b are inclusive: a and b are part of the range. 


3. Exceptions first summarizes which exceptions the function can 
report. Then, it explains what causes each exception and how the i) 
function handles the masked and unmasked cases. 


4. Exception Opcode has the hexadecimal value the function stores in 
the Opcode field of the 80387 State if the function generates a 
trap (see Table 3-1). 


5. Example has a commented ASM386 example that shows how to 
declare the function for linkage with CL387N.LIB (see Section 
3.1.1), how to set up the function’s arguments (push order, register 
load, or both), how to call the function, and how to store the 
result. 


3.2.3 CL387 Real Function Reference 


The remaining pages in this section are a comprehensive reference for 
each Common Elementary Library real function. The functions are in 
alphanumeric order. oO 
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mqerACS 


Returns trigonometric Arc cosine 


Oo Function 


ST := Arccos(ST) 
Result := Arccos(x) if -1.0 s x < +1.0 


Discussion 


mqaerACS returns an angle whose trigonometric cosine equals the input 
x, where -1.0 < x < +1.0. 


mqerACS returns the principal value of Arccos(x), expressed in 
radians. Results are in the range 0... It returns 7/2 rounded to 
64-bit precision for x = +0. 


Exceptions 


#) Possible exceptions are Invalid and Denormal: 


I Input x = +, x = SNaN, x < -1.0, and x > +1.0 cause the I 
exception. If I is masked, mqerACS returns the QNaN indefinite. 
If I is unmasked, control passes to the exception handler with the 
input x still in ST and the exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerACS 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST and the exception opcode set. 


Exception Opcode 


175H 
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mgerACS (continued) 
Example 


mqerACS returns Arccos(x) for x in the range -1.0..+1.0; its results 


fall in the range 0..7. 
; in DATA segment ie) 


HYPOTENUSE DQ 10.0 3; initialized 

ADJACENT SIDE DQ 5.0 3; to test values 
ANGLE_RADIANS DQ ? 

ANGLE DEGREES DQ ? 

RAD _TO DEG DT 4004E52EEOD31EOFC2A9R ; constant 180/pi 


: : s in CODE32 segment 
EXTRN MQERACS: NEAR 


; The following lines compute the angle, given 
; two sides of a right triangle. 


FLD ADJACENT SIDE 


% push, ST := ADJACENT SIDE 
FDIV HYPOTENUSE 


; ST := (ADJACENT SIDE / 
3 HYPOTENUSE) 
CALL MQERACS 5 ST := Arccos(ST) Oo 
FST ANGLE RADIANS s Store result in memory. 
FLD RAD _TO DEG 3 push, ST := 180/Pi 
FMUL 3 ST(1) := ST(1)*ST, pop ST 
FSTP ANGLE DEGREES ; Store result, pop stack. 


; ANGLE DEGREES = 60 - It is a 30-60-90 triangle. 


* 
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maqerASN 


Returns trigonometric Arc sine 


re) Function 


ST := Arcsin(ST) 
Result := Arcsin(x) if -1.0 < x < +1.0 


Discussion 


mqaerASN returns an angle whose trigonometric sine equals the input 
x, where -1.0 < x < +1.0. 


maerASN returns the principal value of Arcsin(x), expressed in 
radians. Results are in the range —7z/2..+7/2. For x = +0, mqerASN 
returns x unchanged. 


Exceptions 


a) Possible exceptions are Invalid and Denormal: 


I. Input x = +~, x = SNaN, x < -1.0, and x > +1.0 cause the I 
exception. If I is masked, mqerASN returns the QNaN indefinite. 
If I is unmasked, control passes to the exception handler with the 
input x still in ST and the exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerASN 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST and the exception opcode set. 


Exception Opcode 
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mqerASN (continued) 
Example 


maerASN returns Arcsin(x) for x in the range -1.0..+1.0; its results 


fall in the range -x/2..4+2/2. 
; in DATA segment oO 


HYPOTENUSE DQ 10.0 3; initialized 


OPPOSITE SIDE DQ 5.0 ; to test values 
THETA DQ ? 


RAD_TO DEG DT 4004E52EEOD31E0FC2A9R ; constant 180/pi 


5 : ; in CODE32 segment 
EXTRN MQERASN: NEAR 


; The following lines compute the angle, given 
; two sides of a right triangle. 


FLD OPPOSITE SIDE 3 push, ST := OPPOSITE_SIDE 
FDIV HYPOTENUSE 3; ST := (OPPOSITE_SIDE / 
; HYPOTENUSE) 
CALL MQERASN 3 ST := Arcsin(ST) 
FLD RAD_TO DEG ; push, ST := 180/pi ie) 
FMUL 3 ST(1) := ST(1)*ST, pop ST 
FSTP THETA 3; Store result, pop stack. 


3 THETA = 30 degrees - It is a 30-60-90 triangle. 


oO 


3-16 Common Elementary Function Library 


maqerATN 


Returns trigonometric Arc tangent 


Oo Function 


ST := Arctan(ST) 
Result := Arctan(x) if -o < x < +0 


Discussion 


maerATN returns an angle whose trigonometric tangent equals the 
input x, where —~ < x < +, 


mqaerATN returns the principal value of Arctan(x), expressed in 
radians. Results are in the range —1/2..+2/2. For x = +0, mqerATN 
returns x unchanged. It returns +x/2 rounded to 64-bit precision for 
xX = +~ and -x/2 rounded to 64-bit precision for x = -=, 


Exceptions 


Possible exceptions are Invalid and Denormal: 


I Input SNaNs cause the I exception. If I is masked, mqerATN 
returns the QNaN indefinite. If I is unmasked, control passes to 
the exception handler with the input x still in ST and the 
exception opcode set. 


D Input denormals cause the D exception. If D is masked, 
mgerATN returns its result. If D is unmasked, control passes to 
the exception handler with x still in ST and the exception opcode 
set. 


Exception Opcode 
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mqerATN (continued) 
Example 
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maerATN returns Arctan(x) for x in the range —~,.+; its results fall 


in the range —2/2..+7/2. 


° 


OPPOSITE SIDE DQ 5.0 : 
ADJACENT SIDE DQ 5.0 H 
ANGLE RADIANS DQ ? 


EXTRN MQERATN: NEAR 


s in DATA segment 
s initialized 


to test values 


in CODE32 segment 


3; The following lines compute an angle, given 
; two sides of a right triangle. 


FLD OPPOSITE_SIDE 
FDIV ADJACENT SIDE 


CALL MQERATN 
FSTP ANGLE RADIANS 


. 
> 
> 
. 
? 
> 
> 


; ANGLE RADIANS = pi/4 - It 


push, ST := OPPOSITE SIDE 
ST := (OPPOSITE_SIDE / 

ADJACENT SIDE) 
ST := Arctan(ST) 


; Store result, pop stack. 


is a 45-45-90 triangle. 
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mgerCOS 


Returns trigonometric cosine 


O Function 
ST : = cos(ST) 


Result := cos(@) if -2 < @ < +0 


Discussion 
mqerCOS returns the trigonometric cosine of an angle @, where -~ < @ 
< +o and @ is expressed in radians. mqerCOS extends the range for 6 
beyond the 80387 FCOS instruction’s. 


Results are in the range -1.0..41.0. For @ = +0, mqerCOS returns 


+1.0. 
Exception 
i) Possible exceptions are Invalid and Denormal: 
I Input 6 = +o and @ = SNaN cause the I exception. If I is masked, 


mqaerCOS returns the QNaN indefinite. If I is unmasked, control 
passes to the exception handler with the input @ still in ST and the 
exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerCOS 
returns its result. If D is unmasked, control passes to the 
exception handler with @ still in ST and the exception opcode set. 


Exception Opcode 
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maqerCOS (continued) 
Example 


mqaerCOS returns cos(@) for @ an angle in radians between but not 
including -~ and +; its results fall in the range -1.0..+1.0. 


in DATA segment oO 


ANGLE DEGREES DQ 30.0 3; initialized 
RADIUS DQ 2.0 3; to test values 
REC_X DQ ? 
DEG_TO_RAD DT 3FF98EFA351294E9C8AER 

3 constant pi/180 


: : 3 in CODE32 segment 
EXTRN MQERCOS: NEAR 


3; The following lines compute the X-coordinate 
; of a polar-to-rectangular conversion. 


FLD ANGLE DEGREES 
FLD DEG _TO_RAD 
FMUL 

CALL MQERCOS 

FMUL RADIUS 


push, ST := ANGLE DEGREES 
push, ST := DEG TO RAD 
ST(1) := ST(1)*ST, pop ST 


ST := cos(ST) a) 
ST := ST*RADIUS (Scale 
to correct radius.) 


Store X-coordinate, 
pop stack. 


1] 


FSTP REC_X 


wee we we we we we we we 


; REC_X is now about square _root(3). 


Oo 


3-20 Common Elementary Function Library 


maqerCSH 


Returns hyperbolic cosine 


re) Function 


ST := cosh(ST) 
Result := cosh(@) if -11355 < @ < +11355 or § = +t 


Discussion 


maerCSH returns the hyperbolic cosine of an angle 6, where -11355 < 
6 < +11355 or 6 = tx, 


Results are in the range +1.0..40. For 6 = +0, mqerCSH returns +1.0; 
for § = +e, it returns +=. 


Exceptions 


Possible exceptions are Invalid, Denormal, and Overflow: 


oO I Input SNaNs cause the I exception. If I is masked, mqerCSH 
returns the QNaN indefinite. If I is unmasked, control passes to 
the exception handler with the input @ still in ST and the 
exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerCSH 
returns its result. If D is unmasked, control passes to the 
exception handler with 6 still in ST and the exception opcode set. 


O Input @ outside the range -11355..+11355 but not equal to +o 
cause the O exception. If O is masked, mqerCSH returns -~ for @ 
< -11355 and +o for 6 > +11355. If O is unmasked, control passes 
to the exception handler with 9@ still in ST and the exception 
opcode set. 


Exception Opcode 


oO 16FH 
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mqerCSH (continued) 
Example 


mgerCSH returns cosh(@); its results fall in the range +1.0..+. 
¢ ; in DATA segment 
THETA 0Q 1.5 3; initialized to test value 
COSH_VALUE DQ ? 


: : ; in CODE32 segment 
EXTRN MQERCSH: NEAR 


3 The following lines compute cosh(THETA). 


FLD THETA 3; ST := THETA 
CALL MQERCSH 3 ST := cosh(ST) 
FSTP COSH_VALUE ; Store result, pop stack. 


3 COSH_VALUE now is about 2.3524096. 


3-22 Common Elementary Function Library 


mqerDIM 


Returns positive difference 


oO Function 


ST := max(ST(1) - ST, +0) 
Result := max(x - y, 0) if -o<x<+oand -~<y <+ as follows: 


e Result := (x - y) ifx2zy 
e Result = 0 if x<y 


Discussion 


mqaerDIM returns (x - y) where x and y are numbers if their 
difference is not less than zero. It returns 0 if (x - y) < 0. mqerDIM 
uses the 80387 precision and rounding modes that are in effect when 
it is called. As a conditional subtraction, its results vary according to 
your settings for the precision and rounding bits of the 80387 Control 
Word; when both operands are +0, it is possible to get a -0 result. 


a) mqgerDIM accepts x = +~ or y = +m as long as x * y, and returns: 
e +0 if x = -~ and -~ < y <+0 
e +0 if x = +0 and -»~ <y < +o 
© 40 if -o<x < +o and y = +0 


© +0 if -0 <x <+0 and y = -o 


Exceptions 


Possible exceptions are Invalid, Denormal, Overflow, and Precision: 


I Input x = y = +, x = y = -«, and (x or y) = SNaN cause the I 
exception. If I is masked, mqerDIM returns the QNaN indefinite. 
If I is unmasked, control passes to the exception handler with the 
input x still in ST(1), y still in ST, and the exception opcode set. 


Oo D Input denormals cause the D exception. If D is masked, mqerDIM 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST(1), y still in ST, and the 
exception opcode set. 
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mqerDIM (continued) 


O The subtraction (x - y) where x > y can cause the O exception. If 
O is masked, mqerDIM returns +~. If O is unmasked, mqerDIM 
stores its result in ST, adjusting the out-of-range exponent to fit 
in the extended format exponent field. mqerDIM subtracts the 
constant 24576 (decimal) to make this adjustment. Then, control Oo 
passes to the exception handler with the exception opcode set. 


P_ An inexact (x - y) causes the P exception. If P is masked, 
mqaerDIM returns its result. If P is unmasked, control passes to 
the exception handler with the result in ST and the exception 
opcode set. 


Exception Opcode 


265H 


Example 


mqaerDIM returns the greater of (x - y) and +0 where x and y are in 
the range -~,.+0 but are not equivalent infinities. 


: ; in DATA segment i) 


COSTS DQ 650.00 initialized 
RECEIPTS DQ 800.00 to test values 
PROFIT DQ ? 

LOSS DQ ? 


we ere 


: : ; in CODE32 segment 

EXTRN MQERDIM: NEAR 

; The following lines store the positive difference 
; in PROFIT or LOSS and set the other value to zero. 


FLD RECEIPTS 3 push, ST := RECEIPTS 

FLD COSTS push, ST := COSTS 

CALL MQERDIM ST := max(ST(1) - ST, +0) 

FSTP PROFIT Store result, pop stack. 
3 Now perform function the other way. 


we we wre 


FLD COSTS ; push, ST := COSTS oO 
FLD RECEIPTS 5 push, ST := RECEIPTS 

CALL MQERDIM ; ST := max(ST(1) - ST, +0) 

FSTP LOSS ; Store result, pop stack. 


; LOSS = +0, PROFIT = 150.00 
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Oo 


oO 


Oo 


maqerEXP 


Returns exponential (e*) 


Function 


ST := eS! 
Results :='e* if -4112 < x < +11356.52 or x = +0 


Discussion 


mqerEXP returns the value of e (the transcendental constant 
2.71828 182845904523536..) raised to the power of the input number x, 
where -4112 < x s +11356.52 or x = +o, 


Results of the exponential function are in the range +0..t0, mqerEXP 
returns: 


e 1.0 for x = +0 
e +0 for x = -o 


e +0 for x = +0 


Exceptions 


Possible exceptions are Invalid, Denormal, Overflow, and Underflow: 


I Input SNaNs cause the I exception. If I is masked, mqerEXP 
returns the QNaN indefinite. If I is unmasked, control passes to 
the exception handler with the input x still in ST and the 
exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerEXP 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST and the exception opcode set. 


O Input +11356.52 < x < +o cause the O exception. If O is masked, 
mqaerEXP returns +», If O is unmasked, control passes to the 
exception handler with x still in ST and the exception opcode set. 


U_ Input -© < x < -4112 cause the U exception. If U is masked, 
mqerEXP returns a gradual underflow denormal, if possible, and 
+0 otherwise. If U is unmasked, control passes to the exception 
handler with x still in ST and the exception opcode set. 
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maqerEXP (continued) 
Exception Opcode 


16BH 


Example a) 


maerEXP returns e” where x is in the range -4112..+11356.52 or is too; 
its results fall in the range +0..+<, 


R : s in DATA segment 
X VALUE DQ 0.4 ; initialized to test value 


MINUS 2 DQ -2 3 constant 
Y VALUE DQ ? 


NORM_ CONSTANT DT 3FFDCC42299EA1B28697R 
3 1/square_root(2*pi) 


: : ; in CODE32 segment 
EXTRN MQEREXP: NEAR 


; The following lines compute the normal distribution. 


ST := X_VALUE aw) 


FLD X_VALUE push, s 
FMUL ST,ST ST := X_VALUE**2 
FIDIV. MINUS 2 ST := ST / -2 
CALL MQEREXP - 2= e**ST 


3 push, ST := NORM CONSTANT 

3 (ST = 1 / square_root(2*pi)) 
3 ST(1) := ST(1)*ST, pop ST 

3 Store result, pop stack. 


FLD NORM_CONSTANT 


FMUL 
FSTP Y_VALUE 


We we we we we we wee 
n 
pe) 
. 


3 Y_VALUE is now about 0.368270140. 
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magerlA2 
Returns nearest word integer 
for number rounded away from zero 


oO Function 


AX := roundaway(ST) 
Result := roundaway(x) as follows: 


e Result := round_to_nearest(x) if fraction_part(x) * 0.5 
e Result := (x + 0.5) if fraction_part(x) = 0.5 and x = 0 
e Result := (x - 0.5) if fraction_part(x) = 0.5 and x < 0 


Discussion 


maerIA2 returns the nearest 16-bit integer for the input number x, 
where -32,768.5 < x < +32,767.5. Results are in the range 
-32768..+32767, expressed in two’s complement. 


When x falls midway between two integers, mqerIA2 rounds x away 
from zero, returning the result with the larger absolute value. For 
example, mqerIA2 returns: 


e 0003H = 3 for x = 3.1 
e OO0BH = 11 for x = 10.5 
e FFFDH for x = -2.5; FFFDH = -3 in word integer format 


Exceptions 


Possible exceptions are Invalid, Denormal, and Precision: 


I Input numbers that cannot fit the 16-bit destination after 
rounding (x < -32768.5 or x = +32767.5) cause the I exception, as 
do infinities and SNaNs. If I is masked, mqerIA2 returns the 
16-bit indefinite integer (8000H = -32768). If I is unmasked, 


control passes to the exception handler with the input x still in ST 
oO and the exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerIA2 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST and the exception opcode set. 
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mgerlA2 (continued) 


P Input x values that are not integers cause the P exception. If P is 
masked, mqerIA2 returns its result. If P is unmasked, control 
passes to the exception handler with the result in ST and the 
exception opcode set. 


oO 


Exception Opcode 


17EH 


Example 


mgaerIA2 returns the nearest word integer for an input number 
between but not including -32768.5 and +32767.5; its results fall in 
the range -32768..432767. If the input is equally close to two integer 
values, mqerIA2 returns the result with the larger absolute value. 


; in DATA segment 


REAL_VAR DQ -8.5 ; initialized to test value 
INT VAR DW 2? 

: 3 ; in CODE32 segment it) 
EXTRN MQERIA2: NEAR 


; The following lines round REAL_VAR to the nearest 
3 integer, rounding away from zero to the larger 

3; absolute value if two integers are equally near. 
FLD REAL_VAR 3 push, ST := REAL_VAR 
CALL MQERIA2 ; AX := roundaway(ST) 

MOV INTEGER_VAR, AX 3; Store result. 


3 INTEGER_VAR now equals -9 (FFF7H). 


Oo 


3-28 Common Elementary Function Library 


maerlA4 
Returns nearest short integer 
for number rounded away from zero 


oO Function 


Oo 


*) 


EAX := roundaway(ST) 
Result := roundaway(x) as follows: 


e Result := round_to_nearest(x) if fraction_part(x) ~ 0.5 
e Result := (x + 0.5) if fraction_part(x) = 0.5 and x = 0 
e Result := (x - 0.5) if fraction_part(x) = 0.5 and x < 0 


Discussion 


mqaerIA4 returns the nearest 32-bit integer for the input number x, 
where -2,147,483,648.5 < x < +2,147,483,647.5 (-29! - 0.5 < x < 427! 
- 0.5). Results are in the range “23 4(251 - 1), expressed in two’s 
complement. 


When x falls midway between two integers, mqerlA4 rounds x away 
from zero, returning the result with the larger absolute value. For 
example, mgerIA4 returns: 


e 00000003H = 3 for x = 3.1 
e 0000000BH = 11 for x = 10.5 


e FFFFFFFDH for x = -2.5; FFFFFFFDH = -3 in short integer 
format 


Exceptions 


Possible exceptions are Invalid, Denormal, and Precision: 


I Input numbers that cannot fit the 32-bit destination after 
rounding (x < -2147483648.5 or x = +2147483647.5) cause the I 
exception, as do infinities and SNaNs. If I is masked, mqerlA4 
returns the 32-bit indefinite integer (80000000H = -231), If I is 
unmasked, control passes to the exception handler with the input x 
still in ST and the exception opcode set. 
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mqerlA4 (continued) 


D Input denormals cause the D exception. If D is masked, mqerIA4 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST and the exception opcode set. 


P Input x values that are not integers cause the P exception. If P is 
masked, mqerIA4 returns its result. If P is unmasked, control oO 
passes to the exception handler with the result in ST and the 
exception opcode set. 


Exception Opcode 


168H 


Example 


mqaerIA4 returns the nearest short integer for an input number 
between but not including (-23! - 0.5) and (23! - 0.5); its results fall 
in the range -291_4(23! - 1). If the input is equally close to two 
integer values, mqeriA4 returns the result with the larger absolute 


value. 
3 in DATA segment oO 


REAL_COUNT DQ 100000.5 3; initialized to test value 
° COUNT DD ? : 


: : ; in CODE32 segment 
EXTRN MQERIA4: NEAR 


3 The following lines round REAL COUNT to the nearest 
3 integer, rounding away from zero to the larger 

3 absolute value when two integers are equally near. 
FLD REAL COUNT 3 push, ST := REAL COUNT 
CALL MQERIA4 ; EAX := roundaway(ST) 

MOV COUNT, EAX 3; Store result. 


3 COUNT is now 100001 (000186A1H). 
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maerlA8& 
Returns nearest long integer 
for number rounded away from zero 


oO Function 


EDX_EAX := roundaway(ST) 
Result := roundaway(x) as follows: 


Result := round_to_nearest(x) if fraction_part(x) » 0.5 
Result := (x + 0.5) if fraction_part(x) = 0.5 and x > 0 
Result := (x - 0.5) if fraction_part(x) = 0.5 and x < 0 


Discussion 


maerIA8& returns the nearest oa dit integer for the input number x, 
where (- a -0.5)<x< +2 - 0.5). Results are in the range 


=23: 42% - 1), expressed in two’s complement. 


When x falls midway between two integers, mqerIA8 rounds x away 
from zero, returning the result with the larger absolute value. For 


example, mqerIA8 returns: 


00000000 00000003H = 3 for x = 3.1 
00000000 0000000BH = 11 for x = 10.5 


FFFFFFFF FFFFFFFDH for x = -2.5; FFFFFFFF FFFFFFFDH = 
-3 in long integer format 


Exceptions 


Possible exceptions are Invalid, Denormal, and Precision: 


I 


Input numbers that cannot fit the 64-bit destination after 
rounding (x < -25 _ 0.5 or x = +25 - 0.5) cause the I exception, 
as do infinities and SNaNs. If I is masked, maerlA2 returns the 
64-bit indefinite integer (8000000000000000H = -2° 3), If I is 
unmasked, control passes to the exception handler with the input x 
still in ST and the exception opcode set. 


Input denormals cause the D exception. If D is masked, mqerIA8 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST and the exception opcode set. 
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mqaerlA8 (continued) 


P Input x values that are not integers cause the P exception. If P is 
masked, mqerIA8 returns its result. If P is unmasked, control 
passes to the exception handler with the result in ST and the 
exception opcode set. 


Exception Opcode oO 


185H 


Example 


maerIA8 returns the nearest long integer for an input number 
between but not_including (-23 - 0.5) and (25 - 0.5); its results fall 
in the range -253_4428 - 1). If the input is equally close to two 
integer values, mqerIA8 returns the result with the larger absolute 


value. 
: : ; in DATA segment 
REAL_VAR DQ 8.5 3; initialized to test value 
INT_VAR DQ ? 


ie s in CODE32 segment oO 


EXTRN MQERIA8:NEAR 


; The following lines round REAL _VAR to the nearest’ 
; integer, rounding away from zero to the larger 
; absolute value if two integers are equally near. 


FLD REAL_VAR 


4 push, ST := REAL_VAR 
CALL MQERIA8 


EDX_EAX := roundaway(ST) 
EAX := lower_4 bytes (ST) 
EDX := next_4 bytes(ST) 
Store least significant 
digits of INT VAR. 

Store most significant 
digits of INT VAR. 


MOV INT VAR, EAX 


MOV INT _VAR+4, EDX 


wee we we we we we we we 


; INT_VAR is now 9 (00000000 00000009H) . oO 
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maerlAX 
Returns nearest integer 
for number rounded away from zero 


‘@) Function 


ST := roundaway(ST) 
Result := roundaway(x) as follows: 


e Result := round_to_nearest(x) if fraction_part(x) ~ 0.5 
e Result := (x + 0.5) if fraction_part(x) = 0.5 and x > 0 
e Result := (x - 0.5) if fraction_part(x) = 0.5 and x < 0 


Discussion 


mqaerJAX returns the nearest integer for the input number x, where 
—o <x <+0, Results fall in the same range and remain in 80-bit 
extended format. 


When x falls midway between two integers, mqerIAX rounds x away 
from zero, returning the result with the larger absolute value. For 
example, mqerIAX returns: 


e 3 for x = 3.3 
e 5 forx=4.5 
e -7 for x = -6.5 


For x = to, mqerIAX returns x unchanged. 


Exceptions 


Possible exceptions are Invalid, Denormal, and Precision: 


I Input SNaNs cause the I exception. If I is masked, mqerIJAX 
returns the QNaN indefinite. If I is unmasked, control passes to 


the exception handler with the input x still in ST and the 
oO exception opcode set. 


D_ Input denormals cause the D exception. If D is masked, mqerIAX 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST and the exception opcode set. 
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maerlAX (continued) 


P Input x values that are not integers cause the P exception. If P is 
masked, mqerIAX returns its result. If P is unmasked, control 
passes to the exception handler with the result in ST and the 
exception opcode set. 


Exception Opcode © 


167H 


Example 


maerIAX returns the nearest integer for an input number in the range 
-o,,+0; its results fall in the same range. If the input is equally close 
to two integer values, maerJAX returns the result with the larger 
absolute value. 


in DATA segment 
initialized to test value 
constant 


3; in CODE32 segment © 


HOURS DQ 2.71 
SIXTY DD 60.0 
MINUTES DT ? 


we we we 


EXTRN MQERIAX: NEAR 


; The following lines convert HOURS into the nearest 
3 integer number of MINUTES, rounding away from zero 
3; to the larger absolute value for MINUTES 
3; if two integers are equally near. 


FLD HOURS ; push, ST := HOURS 

FMUL SIXTY 3 ST := ST*60 

CALL MQERIAX ; ST := roundaway(ST) 
FSTP MINUTES 3 Store result, pop stack. 


; MINUTES is now 163. 


Oo 
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mgerlC2 
Returns word integer 
for truncated number 


i) Function 


oO 


Oo 


AX := chop(ST) 
Result := chop(x) as follows: 


e Result := x - (fraction_part(| x |) with sign of x) 


Discussion 


mqaerIC2 returns the nearest 16-bit integer for the input number x by 
truncating any fraction part of x. Results are in the range 
-32768..+32767, expressed in two’s complement. 


In effect, mqerIC2 rounds a real x towards zero when -32,769 < x < 
+32,768. For example, mqerIC2 returns: 


e 0004H = 4 for x = 4.9999999 
e OO0OBH = 11 for x = 11.7 
e FFFAH for x = -6.9; FFFAH = -6 in word integer format 


Exceptions 


Possible exceptions are Invalid, Denormal, and Precision: 


I Input numbers that cannot fit the 16-bit destination after 
truncation (x < -32769 or x = +32768) cause the I exception, as do 
infinities and SNaNs. If I is masked, mqerIC2 returns the 16-bit 
indefinite integer (8000H = -32768). If I is unmasked, control 
passes to the exception handler with the input x still in ST and the 
exception opcode set. 


D_ Input denormals cause the D exception. If D is masked, mqerIC2 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST and the exception opcode set. 


P Input x values that are not integers cause the P exception. If P is 
masked, mqerIC2 returns its result. If P is unmasked, control 
passes to the exception handler with the result in ST and the 
exception opcode set. 
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mgerlIC2 (continued) 
Exception Opcode 


17FH 


Example oO 


maerIC2 returns the nearest word integer for an input number that 
falls between but not including -32769 and +32768; its results fall in 
the range -32768..+32767. 


in DATA segment 
initialized to test value 
initialized 


REAL_INPUT DQ 65.7 
CONTROL_SETTING DW 0 


we we we 


: : 3 in CODE32 segment 
EXTRN MQERIC2: NEAR 


; The following lines convert the REAL_INPUT 

; into the 16-bit integer value CONTROL_SETTING 

; by truncating any fraction part of REAL_INPUT. 

FLD REAL_INPUT 3 push, ST := REAL_INPUT ie) 
CALL MQERIC2 3 AX := chop(ST) 

MOV CONTROL_SETTING, AX 3; Store result. 


; CONTROL SETTING is now 65 (41H). 


* 
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mqeriC4 
Returns short integer 
for truncated number 


oO Function 


Oo 


EAX := chop(ST) 
Result := chop(x) as follows: 


e Result := x - (fraction_part(| x |) with sign of x) 


Discussion 


maerIC4 returns the nearest 32-bit integer for the input number x by 
truncating any fraction part of x. Results are in the range =>! (2 
- 1), expressed in two’s complement. 


In effect, mqerIC4 rounds a real x towards zero when -2,147,483,649 
< xX < +2,147,483648 (-25! - 1 < x < +23"). For example, mqerIC4 
returns: 


e 00000004H = 4 for x = 4.9999999 
e 0Q00000BH = 11 for x = 11.7 


e FFFFFFFAH for x = -6.9; FFFFFFFAH = -6 in short integer 
format 


Exceptions 


Possible exceptions are Invalid, Denormal, and Precision: 


I Input numbers that cannot fit the 32-bit destination after 
truncation (x < -2147483649 or x = +2147483648) cause the I 
exception, as do infinities and SNaNs. If I is masked, mqerIC4 
returns the 32-bit indefinite integer (80000000H = -231), If I is 
unmasked, control passes to the exception handler with the input x 
still in ST and the exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerIC4 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST and the exception opcode set. 
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mgeriC4 (continued) 

P Input x values that are not integers cause the P exception. If P is 
masked, mqerIC4 returns its result. If P is unmasked, control 
passes to the exception handler with the result in ST and the 
exception opcode set. 


Exception Opcode * 


179H 


Example 


mqerIC4 returns the nearest short integer for an input number that 
falls between but not including -231 - | and +231, its results fall in 
the range -231_ 425! - 1). 


: : ; in DATA segment 
VOTERS DQ 5306279.0 3; initialized to test values 
SUPPORT_SHARE DQ 0.39 3 (estimated % supporters) 
VOTES DD ? 


: : 3 in CODE32 segment oO 
EXTRN MQERIC4: NEAR 


3; The following lines calculate the estimated number 
3 of votes for a particular issue, truncating any 
3 fraction part of VOTERS*SUPPORT SHARE. 


FLD VOTERS 3; push, ST := VOTERS 
FMUL SUPPORT_SHARE 3 ST := ST*SUPPORT_SHARE 
CALL MQERIC4 3 EAX := chop(ST) 

MOV VOTES, EAX 3; Store result. 


3 VOTES is now 2069448 (001F93C8H). 


oO 
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maerlC8 
Returns long integer 
for truncated number 


oO Function 


oO 


EDX_EAX := chop(ST) 
Result := chop(x) as follows: 


e Result := x - (fraction_part(| x |) with sign of x) 


Discussion 


mgerIC8 returns the nearest 64-bit integer for the input number x by 
truncating any fraction part of x. Results are in the range -255 .4(2° 
- 1), expressed in two’s complement. 


In gf fect, mqerIC8 rounds a real x towards zero when -23 1l<x< 
+255. For example, mqerIC8 returns: 


e 00000000 00000004H = 4 for x = 4.9999999 
e 00000000 0000000BH = 11 for x = 11.7 


e FFFFFFFF FFFFFFFAH for x = -6.9; FFFFFFFF FFFFFFFAH = 
-6 in long integer format 


Exceptions 


Possible exceptions are Invalid, Denormal, and Precision: 


I Input numbers that cannot fit the 64-bit destination after 
truncation (x < -28 +1l)orx= +253) cause the I exception, as do 
infinities and SNaNs. If I is masked, maerIC8 returns the 64-bit 
indefinite integer (8000000000000000H = -2° 3), If I is unmasked, 
control passes to the exception handler with the input x still in ST 
and the exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerIC8 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST and the exception opcode set. 
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mqaerlIC8 (continued) 


P Input x values that are not integers cause the P exception. If P is 
masked, mqerIC8 returns its result. If P is unmasked, control 
passes to the exception handler with the result in ST and the 
exception opcode set. 


* 


Exception Opcode 


184H 


Example 


maerIC8 returns the nearest long integer for an input number that 
falls between but not including -253 - | and +25. its results fall in 
the range -253_4(2 - 1). 


in DATA segment 
initialized to test values 
(estimated % supporters) 


VOTERS DQ 53062790.0 
SUPPORT SHARE 0Q 0.39 
VOTES DQ ? 


: : 3 in CODE32 segment @) 
EXTRN MQERIC8: NEAR 


3; The following lines calculate the estimated number 
; of votes for a particular issue, truncating any 
; fraction part of VOTERS*SUPPORT SHARE. 


we we we 


FLD VOTERS ; push, ST := VOTERS 

FMUL SUPPORT SHARE ST := ST*SUPPORT SHARE 
CALL MQERIC8 EDX_EAX := chop(ST) 

EAX := lower_4 bytes(ST) 
EDX := next_4 bytes(ST) 
Store least significant 
digits of VOTES. 

Store most significant 
digits of VOTES. 


MOV VOTES, EAX 


MOV VOTES+4, EDX 


we we we we we we we ew 


; VOTES is now 20694488 (00000000 0136C5D8H) . oO 
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maqerICX 
Returns integer 
for truncated number 


) Function 


oO 


*) 


ST := chop(ST) 
Result := chop(x) as follows: 


e Result := x - (fraction_part(| x |) with sign of x) 


Discussion 


maerICX returns the nearest integer for the input number x by 
truncating any fraction part of x. Results fall in the range - < x < 
+o and remain in 80-bit extended format. 


In effect, mqerICX rounds a real x towards zero when -© < x < +0, 
For example, mqerICX returns: 

e 4 for x = 4,9999999 

e 1 for x = 1.7 

e -3 for x = -3.9 


For x = +o, mqerICX returns x unchanged. 


Exceptions 


Possible exceptions are Invalid, Denormal, and Precision: 


I Input SNaNs cause the I exception. If I is masked, mqerICX 
returns the QNaN indefinite. If I is unmasked, control passes to 
the exception handler with the input x still in ST and the 
exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerICX 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST and the exception opcode set. 


P Input x values that are not integers cause the P exception. If P is 
masked, mqerICX returns its result. If P is unmasked, control 
passes to the exception handler with the result in ST and the 
exception opcode set. 
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mqaerICX (continued) 
Exception Opcode 


166H 


Example | #) 


maerICX returns the nearest integer for an input number in the range 
-0,,400; its results fall in the same range. 


: : ; in DATA segment 
PRICE DOLLARS DT 37.596 3; initialized to test value 
ONE_HUNDRED DD 100.00 3 constant 


: H ; in CODE32 segment 
EXTRN MQERICX: NEAR 


3 The following lines chop PRICE_DOLLARS to a discrete 


3 number of pennies by truncating any fraction 
3; of a penny. 


FMUL ONE HUNDRED ST := ST*100 


FLD PRICE DOLLARS 3 push, ST := PRICE_DOLLARS Oo 
CALL MQERICX 3 ST := chop(ST) 


FDIV ONE HUNDRED ST := ST/100 
FSTP PRICE DOLLARS Store result, pop stack. 


3 PRICE DOLLARS is now 37.59. 


* 


3-42 Common Elementary Function Library 


maerlE2 
Returns word integer for number 
rounded to nearest with even preferred 


oO Function 


oO 


Oo 


AX := roundeven(ST) 
Result := roundeven(x) as follows: 


e Result := round_to_nearest(x) if fraction_part(x) * 0.5 
e Result := (x + 0.5) if fraction_part(x) = 0.5 and (x + 0.5) is even 
e Result := (x - 0.5) if fraction_part(x) = 0.5 and (x + 0.5) is odd 


Discussion 


mgaerIE2 returns the nearest 16-bit integer for input number x, where 
-32,768.5 < x < +32,767.5. Results are in the range -32768..+32767, 
expressed in two’s complement. 


When x falls midway between two integers, mqerIE2 rounds x to the 
even integer value. For example, mqerlE2 returns: 

e 0003H = 3 for x = 3.1 

e OO0AH = 10 for x = 10.5 

e FFFEH for x = -2.5; FFFEH = -2 in word integer format 


Exceptions 


Possible exceptions are Invalid, Denormal, and Precision: 


I Numbers that cannot fit the 16-bit destination (x < -32768.5 or x 
> +32767.5) cause the I exception, as do infinities and SNaNs. If I 
is masked, mqerlIE2 returns the 16-bit indefinite integer (8000H = 
-32768). if I is unmasked, control passes to the exception handler 
with the input x still in ST and the exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerIE2 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST and the exception opcode set. 
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mgerlE2 (continued) 

P Input x values that are not integers cause the P exception. If P is 
masked, mqerIE2 returns its result. If P is unmasked, control 
passes to the exception handler with the result in ST and the 
exception opcode set. 


*) 


Exception Opcode 


180H 


Example 


maerlE2 returns the nearest word integer for an input number x in 
the range -32768.5 < x < +32767.5; its results fall in the range 
~32768..32767. 


: 7 ; in DATA segment 
REAL_VAR DQ -8.5 3; initialized to test value 
INT_VAR DW ? 
: : s in CODE32 segment 
EXTRN MQERIE2: NEAR we) 


; The following lines round REAL_VAR to the nearest 
; word integer, rounding to the even integer 
; when REAL_VAR's fraction part equals 0.5. 


FLD REAL_VAR 3 push, ST := REAL_VAR 
CALL MQERIE2 3 AX := roundeven(ST) 
MOV INT_VAR,AX ; Store result. 


; INT VAR now equals -8 (FFF8H). 


*) 
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maerlE4 
Returns short integer for number 
rounded to nearest with even preferred 


re) Function 


Oo 


EAX = roundeven(ST) 
Result := roundeven(x) as follows: 


e Result := round_to_nearest(x) if fraction_part(x) 0.5 
e Result := (x + 0.5) if fraction_part(x) = 0.5 and (x + 0.5) is even 
e Result := (x - 0.5) if fraction_part(x) = 0.5 and (x + 0.5) is odd 


Discussion 


maerlE4 returns the nearest 32-bit integer | for input number x, where 
=a TAT AB2 048.5 & ® 6 2,197,489 047-5 (- -251 0.5 <x < 23! - 0.5). 
Results are in the range -231 (2?! 1), expressed in two’s 
complement. 


When x falls midway between two integers, mqerIE4 rounds x to the 
even integer value. For example, mqerlIE4 returns: 

e 00000003H = 3 for x = 3.1 

e 0000000AH = 10 for x = 10.5 


e FFFFFFFEH for x = -2.5; FFFFFFFEH = -2 in short integer 
format 


Exceptions 


Possible exceptions are Invalid, Denormal, and Precision: 


I Numbers that cannot fit the 32-bit destination (x < -2147483648.5 
or x = +2147483647.5) cause the I exception, as do infinities and 
SNaNs. If I is masked, maerlE4 returns the 32-bit indefinite 
integer (80000000H = -23 1), If I is unmasked, control passes to 
the exception handler with the input x still in ST and the 
exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerlE4 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST and the exception opcode set. 
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maerlE4 (continued) 


P Input x values that are not integers cause the P exception. If P is 
masked, mqerIE4 returns its result. If P is unmasked, control 
passes to the exception handler with the result in ST and the 
exception opcode set. 


Exception Opcode o 


17BH 


Example 


maerlE4 returns the nearest short integer for an input number x in 
the yrange, “2 +0.5)<x< +231 - 0.5); its results fall in the range 
-231.4(23" - 1), 


‘ : ; in DATA segment 
REAL_COUNT DQ 100000.5 ; initialized to test value 
COUNT DD ? 


: : 3 in CODE32 segment 
EXTRN MQERIE4: NEAR oO 


3 The following lines round REAL_COUNT to the nearest 
; short integer, rounding to the even integer 
3 if REAL_COUNT's fraction part equals 0.5. 


FLD REAL_COUNT 3; push, ST := REAL COUNT 
CALL MQERIE4 3; EAX := roliidesen(ST) 
MOV COUNT, EAX 3; Store result. 


3 COUNT is now 100000 (000186A0H) . 
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magerlE8 
Returns long integer for number 
rounded to nearest with even preferred 


oO Function 


Oo 


EDX_EAX := roundeven(ST) 
Result := roundeven(x) as follows: 


e Result := round_to_nearest(x) if fraction_part(x) * 0.5 
e Result := (x + 0.5) if fraction_part(x) = 0.5 and (x + 0.5) is even 
e Result := (x - 0.5) if fraction_part(x) = 0.5 and (x + 0.5) is odd 


Discussion 


maerlE8 returns the nearest 64-bit integer for input number x where 
-(2% +0.5)<x < +(25 - 0.5). Results are in the range =253 (23 
1), expressed in two’s complement. 


When x falls midway between two integers, mqerIE8 rounds x to the 
even integer value. For example, mqerlE8 returns: 


e 00000000 00000003H = 3 for x = 3.1 
¢ 00000000 0000000AH = 10 for x = 10.5 


e FFFFFFFF FFFFFFFEH for x = -2.5; FFFFFFFF FFFFFFFEH = 
-2 in long integer format 


Exceptions 


Possible exceptions are Invalid, Denormal, and Precision: 


I Numbers that cannot fit the 64-bit destination (x < -(25 + 0.5) or 
x= 425 - 0, 5) cause the I exception, as do infinities and SNaNs. 
If I is masked, mqerIE8 returns the 64-bit indefinite integer 
(8000000000000000H = -2 3). If I is unmasked, control passes to 
the exception handler with the input x still in ST and the 
exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerlIE8 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST and the exception opcode set. 
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maerlE8 (continued) 


P Input x values that are not integers cause the P exception. If P is 
masked, mqerIE8 returns its result. If P is unmasked, control 
passes to the exception handler with the result in ST and the 
exception opcode set. 


* 


Exception Opcode 


186H 


Example 


maerIE8 returns the nearest long integer for an input number x in the 
range -(25 +0.5)<x< +(23 - 0.5); its results fall in the range 


~2®_4(25 - 1). 
: : ; in DATA segment 
REAL_VAR 0Q 8.5 ; initialized to test value 
INT VAR DQ ? 


: : ; in CODE32 segment 
EXTRN MQERIES: NEAR i) 
3 The following lines round REAL VAR to the nearest 
3 long integer, rounding to the even integer 
3 if REAL_VAR's fraction part equals 0.5. 


FLD REAL_VAR 


. push, ST := REAL VAR 
CALL MQERIES 


EDX_EAX := roundeven(ST) 
EAX := lower_4 bytes(ST) 
EDX := next_4 bytes(ST) 
Store least significant 
digits of INT VAR. 

Store most significant 
digits of INT VAR. 


MOV INT_VAR, EAX 


MOV INT_VAR+4, EDX 


we we we we we we we we 


> INT_VAR now equals -8 (FFFFFFFF FFFFFFFS8H). 


oO 
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maerlEX 
Returns integer for number 
rounded to nearest with even preferred 


ie) Function 


oO 


Oo 


ST := roundeven(ST) 
Result := roundeven(x) as follows: 


e Result := round_to_nearest(x) if fraction_part(x) » 0.5 
e Result := (x + 0.5) if fraction_part(x) = 0.5 and (x + 0.5) is even 
e Result := (x - 0.5) if fraction_part(x) = 0.5 and (x + 0.5) is odd 


Discussion 


maerlIEX returns the nearest integer for the input x, where -» <x < 
+, Results fall in the same range and remain in 80-bit extended 
format. 


When x falls midway between two integers, mqerIEX rounds x to the 
even integer value. For example, mqerJEX returns: 

e 3 for x = 3.3 

e 4forx=4.5 

e -6 for x = -6.5 


For x = +o, mqerIEX returns x unchanged. 


Exceptions 


Possible exceptions are Invalid, Denormal, and Precision: 


I Input SNaNs cause the I exception. If I is masked, mqerIEX 
returns the QNaN indefinite in ST. If I is unmasked, control 
passes to the exception handler with the input x still in ST and the 
exception opcode set. 


D_ Input denormals cause the D exception. If D is masked, mqerlEX 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST and the exception opcode set. 
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mqaerlEX (continued) 


P Input x values that are not integers cause the P exception. If P is 
masked, mqerlIEX returns its result. If P is unmasked, control 
passes to the exception handler with the result in ST and the 
exception opcode set. 


* 


Exception Opcode 


178H 


Example 


mgaerJEX returns the nearest integer for an input number x in the 
range -«© < x < +; its results fall in the same range. 


‘ : ; in DATA segment 
UNITS DQ 5890.14 3; initialized to test value 
ONE_GRAND DD 1000.00 3 constant 

THOUSANDS DT ? 


: : ; ; in CODE32 segment 
EXTRN MQERIEX: NEAR we) 
; The following lines compute an integer number of 

; thousands, rounding to the even THOUSANDS value 

; if UNITS*ONE GRAND's fraction part equals 0.5. 


FLD UNITS 3; push, ST := UNITS 

FDIV ONE GRAND 3 ST := ST/1000 

CALL MQERIEX 3; ST := roundeven(ST) 
FSTP THOUSANDS ; Store result, pop stack. 


; THOUSANDS is now 6.00. 


Oo 


3-50 Common Elementary Function Library 


Oo 


# 


oO 


Function 


mqerLGD 


Returns common logarithm 


ST := log, (ST) 
Result := log,)(x) if 0 < x < +0 


Discussion 


mqerLGD returns the result y such that 10” equals the input number 
x. For positive, nonzero x, log,,(x) is a well-defined number. For 
example: 


log,,(1) = 0 

log ,9(100) = 2 

log, (50) ~ 1.69897 
log,,(10) = 1 
log,,(.001) = -3 


Finite results are in the range -4932..44932. mqerLGD returns + for 
X = +0, 


Exceptions 


Possible exceptions are Invalid, Denormal, and Zerodivide: 


I 


Input -0 < x < 0 and x = SNaN cause the I exception. If I is 
masked, mqerLGD returns the QNaN indefinite. If I is 
unmasked, control passes to the exception handler with the input x 
still in ST and the exception opcode set. 


Input denormals cause the D exception. If D is masked, 
mqgerLGD returns its result. If D is unmasked, control passes to 


the exception handler with x still in ST and the exception opcode 
set. 


Input x = +0 causes the Z exception. If Z is masked, mqerLGD . 
returns -~, If Z is unmasked, control passes to the exception 
handler with x still in ST and the exception opcode set. 
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mgerLGD (continued) 
Exception Opcode 


16DH 


Example O 


mgerLGD returns log,.(x) where 0 < x = +=; its finite results fall in 
the range -4932..44939 or its result is + for x = +=, 


: ; in DATA segment 
QUANTITY DQ 0.0001 3; initialized to test value 
TENS POWER DQ ? 


$ : 3 in CODE32 segment 
EXTRN MQERLGD: NEAR 


3 The following lines return the common (base_10) 
; logarithm of the input QUANTITY. 


FLD QUANTITY ; push, ST := QUANTITY 
CALL MQERLGD ; ST := log_base_10(ST) 
FSTP TENS POWER ; Store result, pop stack. #) 


; The test input was 10 ** -4 but result could be 
3 approximately -4 because 0.0001 is not 
; representable exactly in binary. 


* 


3-52 Common Elementary Function Library 


magerLGE 


Returns natural logarithm 


ST := In(ST) 
we) Result := In(x) where 0 < x < + and In(x) = log,(x) 
Function 


mgerLGE returns the result y such that e” equals the input number x, 
where e is the transcendental constant 2.71828182845904523536... For 
positive, nonzero x, In(x) is a well-defined number. For example: 


° In(l)=0 
e In(10) = 2.3025851 
®  In(.001) = -6.9077533 


Finite results are in the range -11355..+11355. mqerLGE returns +0 
for x = +=, 


oO Exceptions 


Possible exceptions are Invalid, Denormal, and Zerodivide: 


I Input -© < x < 0 and x = SNaN cause the I exception. If I is 
masked, mqerLGE returns the QNaN indefinite. If I is unmasked, 
control passes to the exception handler with the input x still in ST 
and the exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerLGE 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST and the exception opcode set. 


Z Input x = +0 causes the Z exception. If Z is masked, mqerLGE 
returns -~, If Z is unmasked, control passes to the exception 
handler with x still in ST and the exception opcode set. 


Exception Opcode 


16CH 
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mqaerLGE (continued) 
Example 


3-54 


maerLGE returns In(x) where 0 < x < +=; its finite results fall in the 
range -11355..+11355 or its result is + for x = +, 


X DQ -3.0 


ONE ODD 1.00 
THETA DQ? 


EXTRN MQERLGE: NEAR 


. 
> 
> 
. 
> 


> 


in DATA segment 
initialized to test value 
constant 


; in CODE32 segment 


The following lines return a radian angle THETA 


; the standard mathematical formula: 


> 
3 as an inverse hyperbolic sine according to 
> 
> 


arcsinh(x) = In(x + square_root(x**2 + 1)). 


FLD X 

FMUL ST,ST 
FADD ONE 
FSQRT 

FADD X 

CALL MQERLGE 
FSTP THETA 


we Oe we we we we we 


ST := X 

ST*ST 

ST +1 
square_root (ST) 

ST + X 

In(ST) 

Store result, pop stack. 


n 
pel 
i t uous 


; THETA is now about -1.8184465. 


Common Elementary Function Library 


Oo 


Oo 


oO 


maqerMAX 
Returns the greater 
of two numbers 


oO Function 


ST := maximum(ST(1),ST) 
Result := maximum(x,y) as follows: 


e Result :=xifx>y 


e Result := y if x<y 


Discussion 


mqerMAX returns the greater of x and y, where x and y are numbers 
in the range -~,.+<, 


Results are in the same range. If x = y, mqerMAX returns y (last- 
pushed argument), even when x = y = +0. 


#) Exceptions 


Possible exceptions are Invalid and Denormal: 


I Input SNaNs and QNaNs cause the I exception. mqerMAX relies 
implicitly on the trichotomy law to determine its result, and NaNs 
are unordered with respect to the representable numbers. If I is 
masked, mqerMAX returns the QNaN indefinite. If I is 
unmasked, control passes to the exception handler with the input x 
still in ST(1), y still in ST, and the exception opcode set. 


D Input denormals cause the D exception. If D is masked, 
mqerMAX returns its result. If D is unmasked, control passes to 
the exception handler with x still in ST(1), y still in ST, and the 
exception opcode set. 


oO Exception Opcode 
282H 
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mqerMAX (continued) 
Example 


mqerMAX returns the greater of (x,y), where x and y are numbers in 
the range -~..+0; its results fall in the same range with a result of y 


(last-pushed argument) if x = y. oO 
$ 5 ; in DATA segment 
X_VARL DQ -5.3 3; initialized 
Y_VAR2 DQ -7 ; to test values 
LARGER DQ ? 
: ; in CODE32 segment 


EXTRN MQERMAX: NEAR 


3 The following lines set LARGER to the maximum 
; of X_VAR1 and Y_VAR2. 


FLD X_VARI ; push, ST := X_VARI 

FLD Y_VAR2 3 push, ST := Y_VAR2 

CALL MQERMAX 3 ST := max(ST(1),ST) 

FSTP LARGER ; Store result, pop stack. 

; LARGER is now -5.3. Oo 
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mgerMIN 
Returns the lesser 
of two numbers 


oO ST := minimum(ST(1),ST) 
Result := minimum(x,y) as follows: 
e Result := x ifx<y 


e Result := y ifx2y 


Function 


mqerMIN returns the lesser of x and y, where x and y are numbers in 
the range -~.,+0, 


Results are in the same range. If x = y, mqerMIN returns y (last- 
pushed argument), even when x = y = +40. 


Exceptions 


oO Possible exceptions are Invalid and Denormal: 


I Input SNaNs and QNaNs cause the I exception. mqerMIN relies 
implicitly on the trichotomy law to determine its result, and NaNs 
are unordered with respect to the representable numbers. If I is 
masked, mqerMIN returns the QNaN indefinite. If I is unmasked, 
control passes to the exception handler with the input x still in 
ST(1), y still in ST, and the exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerMIN 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST(1), y still in ST, and the 
exception opcode set. 


Exception Opcode 


281H 


* 
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mqerMIN (continued) 
Example 


maerMIN returns the lesser of (x,y), where x and y are numbers in 
the range -~,.4+0; its results fall in the same range with a result of y 


(last-pushed argument) if x = y. oO 
: : ; in DATA segment 
X_VARl1 DQ -5.3 3; initialized 
Y VAR2 DQ -7.9 ; to test values 


SMALLER DQ 2 


: : ; in CODE32 segment 
EXTRN MQERMIN: NEAR 


; The following lines set SMALLER to the minimum 
; of X VARI and Y_VAR2. 


FLD X_VAR1 3 push, ST := X_VARI1 

FLD Y_VAR2 3 push, ST := Y VAR2 

CALL MQERMIN 3 ST := minimum(ST(1),ST) 

FSTP SMALLER 3; Store result, pop stack. O 


3; SMALLER is now -7.9. 


*) 


. 


3-58 Common Elementary Function Library 


mqerMOD 
Returns modulus 
with sign of dividend 


oO Function 


* 


ST := (ST(1) mod ST) with sign of ST(1) 
Result := x mod y with sign of x, as follows: 


e Result := x - (y * chop(x/y)) if -0 < x < +o and y «0 
e chop(x/y) = (x/y) - (fraction_part(| x/y |) with sign of x/y) 


Discussion 


maqerMOD returns the modulus of x and y for -~ <x <+wand -o< 
y <0 or 0 < y< +e. mqerMOD extends the range for x and y beyond 
the 80387 FPREM instruction’s. The result’s absolute value is always 
less than | y |, signed with the same sign as x. 


mgqerMOD subtracts an integer multiple of y from the input x to 
bring x down to within y units of zero. For example, if y = +5, 
mqerMOD returns a result between, but not including, -5 and +5 as 
follows: 


e maerMOD (-7,5) = -2 

e maerMOD (-10,5) = -0 

e maerMOD (-19.99,-5) = -4.99 
e mqaerMOD (19.99,-5) = 4.99 

e mqaerMOD (45,5) = +0 

¢ maerMOD (44.75,5) = 4.75 


If y = +, mqerMOD returns x unchanged as long as x is a finite, 
representable number or a QNaN. 


mqerMOD places the three least significant bits of chop(x/y) in the 
condition code bits C. 3C,Cy of the 80387 Status Word. Cy, has the least 
significant bit, C, has the next bit, and C; has the most sigaificgnt bit 
of these chop(x/y) bits. 
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mgerMOD (continued) 
Exceptions 


Possible exceptions are Invalid and Denormal: 


If I is masked, mqerMOD returns the QNaN indefinite. If I is 
unmasked, control passes to the exception handler with the input x 
still in ST(1), y still in ST, and the exception opcode set. 


I Input x = +e, y = +0, and (x or y) = SNaN cause the I exception. : 


D Input denormals cause the D exception. If D is masked, 
mqerMOD returns its result. If D is unmasked, control passes to 
the exception handler with x still in ST(1), y still in ST, and the 
exception opcode set. 


Exception Opcode 


269H 


Example 


maqerMOD returns (x - (y * chop(x/y))) for x in the range -~ < x < 

+o and y in the range -~ < y <0 or 0 < y < +~. Its results fall in the Oo 
ranges -y < (x mod y) < 0 for negative x and 0 < (x mod y) < y for 

positive x. 


s e ; in DATA segment 
X DQ 181137.00 3; initialized to test value 
ONE_GRAND DD 1000.00 3; constant 

LAST THREE_DIGITS DQ ? 


: 7 3 in CODE32 segment 
EXTRN MQERMOD: NEAR 


; The following lines calculate X MOD 1000. 


FLD X 3 push, ST := X 

FLD ONE_GRAND 3 push, ST := ONE GRAND 

CALL MQERMOD 3 ST := ST(1) mod ST 

FSTP LAST_THREE DIGITS ; Store result, pop stack. oO 


3 LAST_THREE DIGITS is 137.00. 
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mgqerMOD 
Returns modulus 
with sign of dividend 


a) Function 


Oo 


ST := (ST(1) mod ST) with sign of ST(1) 
Result := x mod y with sign of x, as follows: 


e Result := x - (y * chop(x/y)) if -0 < x < t~ and y x0 
e chop(x/y) = (x/y) - (fraction_part(| x/y |) with sign of x/y) 


Discussion 


mqerMOD returns the modulus of x and y for -~ <x <+~ and -»< 
y <0 or 0 < y<-+«, mqerMOD extends the range for x and y beyond 
the 80387 FPREM instruction’s. The result’s absolute value is always 
less than | y |, signed with the same sign as x. 


mqerMOD subtracts an integer multiple of y from the input x to 
bring x down to within y units of zero. For example, if y = +5, 
mqerMOD returns a result between, but not including, -5 and +5 as 
follows: 


e mgerMOD (-7,5) = -2 

e mgerMOD (-10,5) = -0 

e maerMOD (-19.99,-5) = -4.99 
e mgaerMOD (19.99,-5) = 4.99 

¢ magerMOD (45,5) = +0 

¢ mgerMOD (44.75,5) = 4.75 


If y = +o, mqerMOD returns x unchanged as long as x is a finite, 
representable number or a QNaN. 


mqerMOD places the three least significant bits of chop(x/y) in the 
condition code bits C 3C,Cy of the 80387 Status Word. C, has the least 
significant bit, C, hag the ext bit, and C; has the most Sienificant bit 
of these chop(x/y) bits. 
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mqerMOD (continued) 
Exceptions 


Possible exceptions are Invalid and Denormal: 


If I is masked, mqerMOD returns the QNaN indefinite. If I is 
unmasked, control passes to the exception handler with the input x 
still in ST(1), y still in ST, and the exception opcode set. 


I Input x = +o, y = +0, and (x or y) = SNaN cause the I exception. e) 


D Input denormals cause the D exception. If D is masked, 
mqerMOD returns its result. If D is unmasked, control passes to 
the exception handler with x still in ST(1), y still in ST, and the 
exception opcode set. 


Exception Opcode 


269H 


Example 


maqerMOD returns (x - (y * chop(x/y))) for x in the range -~ < x < 

+o and y in the range -~ < y < 0 or 0 < y < +=, Its results fall in the oO 
ranges -y < (x mod y) < 0 for negative x and 0 < (x mod y) < y for 

positive x. 


: s ; in DATA segment 

X DQ 181137.00 3; initialized to test value 
ONE_GRAND DD 1000.00 ; constant 

LAST_THREE DIGITS DQ ? 


: : ; in CODE32 segment 
EXTRN MQERMOD: NEAR 


; The following lines calculate X MOD 1000. 


FLD X 3 push, ST := X 

FLD ONE_GRAND ; push, ST := ONE GRAND 

CALL MQERMOD ; ST := ST(1) mod ST 

FSTP LAST_THREE_DIGITS ; Store result, pop stack. oO 


3 LAST_THREE DIGITS is 137.00. 
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mgqerRMD 


Returns remainder 


Function 


ST := (ST(1) rem ST) 
Result := x rem y as follows: 


e Result := x - (y * roundeven(x/y)) if x * to and y ~ 0 

e roundeven(x/y) = 
e round_to_nearest(x/y) if fraction_part(x/y) ¥ 0.5 
e (x/y + 0.5) if fraction_part(x/y) = 0.5 and (x/y + 0.5) is even 
e (x/y - 0.5) if fraction_part(x/y) = 0.5 and (x/y + 0.5) is odd 


Discussion 


maqerRMD returns the remainder of x and y where -» < x < +~ and 
-o <y <0or0 < y <+«. mgqerRMD extends the range for x and y 
beyond the 80387 FPREM!1 instruction’s. Results are in the range 
-y/2..4y/2. 


mqerRMD subtracts an integer multiple of y from the input x to 
bring x down to within y/2 units of zero. For example, if y = +5, 
maqerMOD returns a result between -2.5 and +2.5 as follows: 


e mgaerRMD (-7,5) = -2 

e maerRMD (-10,5) =0 

e mqaerRMD (-19.99,-5) = +0.01 

e maerRMD (19.99,-5) = -0.01 

e mqaerRMD (44.75,5) = -0.25 

e mqaerRMD (2.5,5) = 2.5 

® mqaerRMD (7.5,5) = -2.5 

For x that are odd integer multiples of y/2, results alternate between 
-y/2 and +y/2. mqerRMD returns +y/2 for input x values in the 


series {... -7y/2, -3y/2, y/2, 5y/2, 9y/2, ...}. It returns -y/2 for input 
x values in the series {... -Sy/2, -y/2, 3y/2, 7y/2, lly/2, ...}. 
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mqerRMD (continued) 
If y = +o, mqerRMD returns x unchanged as long as x is a finite, 
representable number or a QNaN. 


mqerRMD places the three least significant bits of roundeven(x/y) in 

the condition code bits C,C,C, of the 80387 Status Word. C, has the 

least significant bit, C, has the next bit, and C, has the most oO 
significant bit of these roundeven(x/y) bits. 


Exceptions 


Possible exceptions are Invalid and Denormal: 


I Input x = +, y = +0, and (x or y) = SNaN cause the I exception. 
If I is masked, mqerRMD returns the QNaN indefinite. If I is 
unmasked, control passes to the exception handler with x still in 
ST(1), y still in ST, and the exception opcode set. 


D Input denormais cause the D exception. If D is masked, 
mgqerRMD returns its result. If D is unmasked, control passes to 
the exception handler with x still in ST(1), y still in ST, and the 
exception opcode set. 


Exception Opcode oO 
27AH 


* 
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Example 


mqerRMD (continued) 


mqerRMD returns (x - (y * roundeven(x/y))) where -~ < x < +” and 
y * 0; its results are in the range -y/2..+y/2. 


Oo 


EXTRN MQERRMD: NEAR 


THETA_RADIANS DQ -6.00 


in DATA segment 
initialized to test value 


in CODE32 segment 


; The following lines reduce the angle THETA RADIANS 


; to its principal value. 


FLD THETA_RADIANS 
FLOPI 

FADD ST,ST 

CALL MQERRMD 

FSTP THETA_RADIANS 


° 
> 
. 
> 
> 
. 
> 
> 


push, ST : 
push, ST : 
ST := 2 * pi 

ST := ST(1) rem ST 


THETA_RADIANS 
pi 


; Store result, pop stack. 


i) 3 THETA_RADIANS is now about 0.2831853. 
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mqerSGN 
Returns number 
with other number's sign 


Function : oO 


ST := ST(1) with sign of ST 
Result := x with sign of y as follows: 


e Result :=|x| if y>=0 
e Result := -| x | if y <0 


Discussion 


mqerSGN returns the absolute value of x with the sign of y, where x 
and y are numbers in the range -~,.+0, Results are in the same range. 


Along with +o for x, mqerSGN accepts any bit pattern in extended 
format (80 bits) without signaling an exception. However, y must be 
a signed number or +o. maqerSGN returns + x | if y = -0. Oo 


Exceptions 


Possible exceptions are Invalid and Denormal: 


I Input (x or y) = SNaN or y = QNaN causes the I exception. 
mqaerSGN relies implicitly on the trichotomy law to determine the 
sign of its result, and NaNs are unordered with respect to the 
representable numbers. If I is masked, mqerSGN returns the 
QNaN indefinite. If I is unmasked, control passes to the 
exception handler with the input x still in ST(1), y still in ST, and 
the exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerSGN 
returns its result. If D is unmasked, control passes to the 
exception handler with x still in ST(1), y still in ST, and the 
exception opcode set. 


* 


Exception Opcode 


264H 
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Oo 


Oo 


magerSGN (continued) 


Example 


mqaerSGN returns | x | with the sign of y, where x and y are numbers 


in the range -~,.+0; its results fall in the same range. 
: : ; in DATA segment 
Y_COOR DQ -0.001 3 initialized to test value 
THETA_RADIANS DQ ? 


in CODE32 segment 


we 


EXTRN MQERSGN: NEAR 


3 The following lines return the angle pi 
3 with the sign of Y COOR. 


FLDPI 3 push, ST := pi 

FLD Y_COOR s push, ST := Y_COOR 

CALL MQERSGN ; ST := ST(1) with sign of ST 
FSTP THETA_RADIANS 3; Store result, pop stack. 


3 THETA_RADIANS is now -pi. 
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mgerSIN 


Returns trigonometric sine 


Function 


ST := sin(ST) 
Result := sin(6) if -~ < § < +0 


Discussion 


maerSIN returns the trigonometric sine of an angle 9, where -~ < § < 
+o and @ is expressed in radians. maerSIN extends the range for 6 
beyond the 80387 FSIN instruction’s. 


Results are in the range -1.0..41.0. For @ = +0, mgerSIN returns 6 


unchanged. 


Exceptions 


Possible exceptions are Invalid and Denormal: 


I Input @ = to and @ = SNaN cause the I exception. If I is masked, 
mqerSIN returns the QNaN indefinite. If I is unmasked, control 
passes to the exception handler with the input @ still in ST and the 


exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerSIN 
returns its result. If D is unmasked, control passes to the 
exception handler with @ still in ST and the exception opcode set. 


Exception Opcode 


171H 
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*) 


mqaerSIN (continued) 
Example 


maerSIN returns sin(@) for @ a finite angle in radians; its results fall 

in the range -1.0..+1.0. 
oO ‘ : ; in DATA segment 
POLAR_THETA DQ 30.0 ; initialized 
POLAR RADIUS DQ 2.0 ; to test values 
DEG _TO_RAD DT 3FF98EFA351294E9C8AER 

3 constant pi/180 

REC_Y DQ ? 


: : ; in CODE32 segment 
EXTRN MQERSIN: NEAR 


; The following lines compute the Y-coordinate 
3; of a polar-to-rectangular conversion. 


FLD POLAR THETA 5 push, ST := POLAR THETA 

FLD DEG TO RAD 3 push, ST := DEG TO RAD 

FMUL 5 §T(1) := ST(1)*ST, pop ST 
Oo CALL MQERSIN ; ST := sin(ST) 

FMUL POLAR RADIUS ; ST := ST*POLAR RADIUS 


FSTP REC_Y- Store result, pop stack. 


3 REC_Y is now 1.0. 


oO 
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maqerSNH 


Returns hyperbolic sine 


Function Oo 


ST := sinh(ST) 
Result := sinh(@) if -11355.13 < 6 < +11355.13 or @ = +0 


Discussion 


maerSNH returns the hyperbolic sine of an angle 6, where -11355.13 
< 6 < +11355.13 or @ = +2, 


Results are in the range -~..+0, For 6 = +0 or @ = +o, mqerSNH 
returns § unchanged. 


Exceptions 


Possible exceptions are Invalid, Denormal, and Overflow: 


I Input SNaNs cause the I exception. If I is masked, mqerSNH #) 
returns the QNaN indefinite. If I is unmasked, control passes to 
the exception handler with the input @ still in ST and the 
exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerSNH 
returns its result. If D is unmasked, control passes to the 
exception handler with @ still in ST and the exception opcode set. 


O Input 6 outside the range -11355.13..411355.13 but not equal to +e 
cause the O exception. If O is masked, mqerSHN returns -~ for @ 
< -11355.13 and + for § > +11355.13. If O is unmasked, control 
passes to the exception handler with @ still in ST and the 
exception opcode set. 


Exception Opcode 


16EH oO 
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maerSNH (continued) 


maerSNH returns sinh(@) where -11355.13 < 6 < +11355.13 or 6 = 
+o: its results fall in the range —~..1<, 


: G 3; in DATA segment 
THETA DQ -2.7 3; initialized to test value 
SINH VALUE DQ ? 


: : ; in CODE32 segment 
EXTRN MQERSNH: NEAR 


3 The following lines compute sinh(THETA) 
3 and store the result in SINH_ VALUE. 


FLD THETA 3; push, ST := THETA 
CALL MQERSNH 3 ST := sinh(ST) 
FSTP SINH_VALUE 3 Store result, pop stack. 


3 SINH_VALUE is now about -7.4062628. 
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maqerTAN 


Returns trigonometric tangent 


Function O 


ST := tan(ST) 
Result := tan(@) if -© < 9 < +0 


Discussion 
mqerTAN returns the trigonometric tangent of an angle 6, where - < 
6 < +0 and @ is expressed in radians. mqerTAN extends the range for 
6 beyond the 80387 FPTAN instruction’s. 


Results are in the range -«..t0, For @ = +0, mqerTAN returns 6 


unchanged. 

Exceptions 
Possible exceptions are Invalid and Denormal: oO 
I Input 9 = to and @ = SNaN cause the I exception. If I is masked, 


mqerTAN returns the QNaN indefinite. If I is unmasked, control 
passes to the exception handler with the input @ still in ST and the 
exception opcode set. 


D Input denormals cause the D exception. If D is masked, 
mqgerTAN returns its result. If D is unmasked, control passes to 
the exception handler with @ still in ST and the exception opcode 
set. 


Exception Opcode 


173H 


oO 
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mqaerTAN (continued) 
Example 


mqerTAN returns tan(#) where —-o < @ < +0 and @ is an angle in 
radians; its results fall in the range -~,.+0, 
oO : si ; in DATA segment 
THETA_DEGREES DQ 45.00 3; initialized to test value 
DEG_TO_RAD DT 3FF98EFA351294E9C8AER 
; constant pi/180 
SLOPE DQ ? 


$ : ; in CODE32 segment 
EXTRN MQERTAN: NEAR 


3 The following lines compute tan(THETA_ DEGREES) 
; to determine the slope of a line in the x-y plane. 


FLD THETA DEGREES s push, ST := THETA DEGREES 
FLD DEG_TO_RAD 3 push, ST := pi/180 
FMUL 3 ST(1) := ST(1)*ST, pop ST 
CALL MQERTAN 3 ST := tan(ST) 

 #) FSTP SLOPE, ; Store result, pop stack. 


3; SLOPE is now 1.0. 
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magerTNH 


Returns hyperbolic tangent 


Function Oo 
ST := tanh(ST) i 


Result := tanh(@) if -0 < @ < +0 


Discussion 


maerTNH returns the hyperbolic tangent of an angle 6, where -o < @ 
S +0, 


Results are in the range -1.0..+1.0. mqerTNH returns -1.0 for -0 < 6 
< -32 and +1.0 for +32 < 6 < +0. For 6 = +0, mgerTNH returns 6 
unchanged. 


Exceptions 


Possible exceptions are Invalid and Denormal: ae) 


I Input SNaNs cause the I exception. If I is masked, mqerTNH 
returns the QNaN indefinite. If I is unmasked, control passes to 
the exception handler with the input @ still in ST and the 
exception opcode set. 


D Input denormals cause the D exception. If D is masked, 
mqerTNH returns its result. If D is unmasked, control passes to 
the exception handler with @ still in ST and the exception opcode 
set. 


Exception Opcode 


170H 
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Example 


mqerTNH (continued) 


mqerTNH returns tanh(@); its results fall in the range -1.0..+1.0. 


THETA DQ -0.62 
TANH VALUE DQ ? 


EXTRN MQERTNH: NEAR 


s in DATA segment 
3; initialized to test value 


; in CODE32 segment 


; The following lines compute tanh(THETA) 
; and store the result in TANH VALUE. 


FLD THETA 
CALL MQERTNH 
FSTP TANH_ VALUE 


3 TANH_VALUE is now about 
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> 
’ 
. 
> 


3; push, ST := THETA 
3; ST := tanh(ST) 


Store result, pop stack. 


-0.5511281. 
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maqerY2X 
Returns real number 
raised to a real or integer power 


Function oO 


ST := ST(1)" ; 
Result := y* or Result := y’ where x is a non-integer and j is an 
integer as follows: 


e Result := y if y = +0 and (x or j) > 0 

e Result := y* if 0 < y < +@ and -~ < x < +o 

e Result := 1.0 if y ~ + and j = +0 

e Result := y! if -~ < y < +~ and j * +0 as follows: 
e Result := y! if 0 < y < +o and j>0 
e Result =| y iy if -~ < y < 0 and j is even 
e Result := -(|'y |/) if -« < y < 0 and j is odd 


Discussion oO 


mqerY2X returns y* or y/ where y is a number, x is a non-integer, 


and j is an integer; y, x, and j are in 80-bit extended format as are 
the results. 


For finite y > 0 with a finite, non-integer exponent, mqerY2X returns 
2ix*log_basé_2(y)) for yX maerY2X accepts y = +=, y = +0, or x = +o 
under certain conditions and returns: 


e +0if y=+oandx>0 

e +0 if y=+0 and -o<x <0 
°e yif y=+0and0<x<+0 

e +0 if +0 < y < +1.0 and x = 
© +0 if +1.0 < y <+oand x = 


oO 


e +0 if +0 <y<+1.0 andx= 


bb t 3 


e +0 if +1.0 < y < +o and x 
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mqaerY2X (continued) 
For finite y > 0 with an integer exponent, mqerY2X returns: 
‘oe 2 (i*log_base_2(y)) if | j | > 63 


e y/ if 1 < j < 63 by successively squaring and multiplying y to 
oO compute the correct power 


° y) if -63 < j s -1, by evaluating one of two possible expressions: 


e 1/ (y! j l) provided that the denominator would not cause 
numeric overflow or underflow 


e (1/y)! i | otherwise 
For finite y < 0 with an integer exponent, mqerY2X first computes 


| y |) as for finite y > 0. Then, it determines the sign of the result 
according to whether j is even (+) or odd (-). 


For | j | < 63, mqerY2X performs no more than nine multiplications 
in evaluating (y*y *(y*y) ...*(y*...*y)) with its squaring-and- 
multiplying algorithm. 


mqerY2X accepts y = +~ or y = +0 with an integer exponent under 
i) certain conditions and returns: 

e 40 if y=+n and j>0 

e +0 if y=+0 andj <0 

e +0 if y = -«, j > 0, and j is even 

e -« if y =-«, j > 0, and j is odd 

e §6+0 if y = -«, j < 0, and j is even 

e -0 if y = -«, j < 0, and j is odd 

e yif y= +0 andj>0 


*) 


Common Elementary Function Library : 3-75 


maerY2X (continued) 


Exceptions 
Possible exceptions are Invalid, Denormal, Zerodivide, Overflow, and 
Underflow: ° 
I Input SNaNs, y = +o with a zero exponent, -~ < y < 0 with an @) 


infinite or non-integer exponent, and y = +1.0 with an infinite 
exponent cause the I exception. If I is masked, mqerY2X returns 
the QNaN indefinite. If I is unmasked, control passes to the 
exception handler with the input y still in ST(J), the input 
exponent still in ST, and the exception opcode set. 


D Input denormals cause the D exception. If D is masked, mqerY2X 
returns its result. If D is unmasked, control passes to the 
exception handler with y still in ST(1), the exponent still in ST, 
and the exception opcode set. 


Z Input y = +0 with a finite (x or j) < 0 causes the Z exception. If 
Z is masked, mqerY2X returns © with the sign of y. If Z is 
unmasked, control passes to the exception handler with y still in 
ST(1), the exponent still in ST, and the exception opcode set. 


extended format causes the O exception. If O is masked, 
mqerY2X returns ~ with the same sign as the true result. If O is 
unmasked, control passes to the exception handler with the input y 
in ST(1), the input exponent in ST, and the exception opcode set. 


O Ay*or y) whose exponent is too large to be represented in the O 


U Aly*|[or| y? | too tiny to fit accurately in extended format 
causes the U exception if U is masked. In this case, mqerY2X 
returns a gradual underflow denormal, if possible; otherwise, it 
returns +0. A | y*| or] y/ | less than the smallest positive 
normalized number causes the U exception if U is unmasked. In 
this case, control passes to the exception handler with the input y 
in ST(1), the exponent in ST, and the exception opcode set. 


Exception Opcode 


26AH 


Oo 
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Oo 


Example 


maerY2X returns y* or y/, 


INPUT VALUE DQ 64.00 


mqgerY2X (continued) 


in DATA segment 
initialized to test value 


ONE THIRD DT 0.333333333333333333333 3 constant 


CUBE_ROOT DQ ? 


EXTRN MQERY2X: NEAR 


. 
» 


in CODE32 segment 


3; The following lines take a cube root 


; and store the result in 


FLD INPUT_VALUE 
FLD ONE_THIRD 
CALL MQERY2X 

FSTP CUBE_ROOT 


> 
. 
ey 
> 
> 


CUBE_ROOT. 
push, ST := INPUT VALUE 
push, ST := ONE THIRD 


5 ST t= ST(QQ)*ssT™ 


Store result, pop stack. 


3 CUBE_ROOT is now about 4.0. 
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mqaerYl2 
Returns real number 
raised to a word integer power 


Function 


ST := ST” 
Result := y! if -o < y < +~ and -32,768 < j < +32,767 as follows: 


Result := 1.0 if j =0 


Result := +0 if y = +0, j > 0, and j is even 


Result := y if y = +0, j > 0, and j is odd 
Result := y! if 0 < y < +~ and -32,768 < j < 0 or O < j S$ +32,767 


Result := | y [3 if -o < y <0, j ¥ 0, and j is even 


Result := -(| y iD) if -~ < y < 0 and j is odd 


Discussion 
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mqaerYI2 returns yl, where y is a real number and j is a 16-bit 
integer, expressed in two’s complement. If j = 0, mqerYI2 returns 
+1.0, whatever the value of y. 


For finite y > 0, mqerYI2 returns: 


2(i*log_base_2(y)) if | jl > 63 


y) if 1 < j < 63 by successively squaring and multiplying y to 


compute the correct power 


y/ if -63 <j <~-1 by evaluating one of two possible expressions: 


e 1/ (y! i ly provided that the denominator would not cause 
numeric overflow or underflow 


° (1/y)! i | otherwise 


For finite y < 0, mqerYI2 first computes | y iu as for finite y > 0. 
Then, it determines the sign of the result according to whether j is 
even (+) or odd (-). 
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mqaerYI2 (continued) 


For | j | s 63, mqerYI2 performs no more than nine multiplications in 
evaluating (y*y *(y*y) ...*(y*...*y)) with its squaring-and-multiplying 
algorithm. 


mgerYI2 accepts input y = +o or y = +0 and returns: 


+0 if y= +40 and j>0 

+0 if y = +~ and j < 0 

+0 if y = -~, j > 0, and j is even 
-o if y = -«, j > 0, and j is odd 
+0 if y = -~, j < 0, and j is even 
-0 if y = -~, j < 0, and j is odd 
+0 if y = +0, j > 0, and j is even 
y if y = +40, j > 0, and j is odd 


Exceptions 
Possible exceptions are Invalid, Denormal, Zerodivide, Overflow, and 
Underflow: 
I Input y = SNaN causes the I exception. If I is masked, mqerYI2 


returns the QNaN indefinite. If I is unmasked, control passes to 
the exception handler with the input y in ST(1), the input j in ST, 
and the exception opcode set. 


Input denormals cause the D exception. If D is masked, mqerYI2 
returns its result. If D is unmasked, control passes to the 
exception handler with the input y in ST(1), the input j in ST, 
and the exception opcode set. 


Input y = +0 with j < 0 causes the Z exception. If Z is masked, 
mqaerYI2 returns with the same sign as y. If Z is unmasked, 
control passes to the exception handler with the input y in ST(1), 
the input j in ST, and the exception opcode set. 


A y’ whose exponent is too large to be represented in the 
extended format causes the O exception. If O is masked, mqerYI2 
returns © with the same sign as the true result. If O is unmasked, 
control passes to the exception handler with the input y in ST(1), 
the input j in ST, and the exception opcode set. 
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mgerYI2 (continued) 


U_ Aly’ | too tiny to fit accurately in extended format causes the U 
exception if U is masked. In this case, mgerYI2 returns a gradual 
underflow denormal, if possible; otherwise, it returns +0. A | y? | 
less than the smallest possible normalized number causes the U 
exception if U is unmasked. In this case, control passes to the i) 
exception handler with the input y in ST(1), the input j in ST, 
and the exception opcode set. 


Exception Opcode 


27CH 


Example 


mqerY12 raises a real number y on the 80387 stack to the power of a 
16-bit integer in the AX register. Its results fall in the range of 
finite, representable numbers or its results are +o. 


: ‘ in DATA segment 
INT POWER DW 9 .- 


3; initialized 
REALLY DQ 1.3 3; to test values O 
REAL_OUTPUT DQ ? 


: : s in CODE32 segment 
EXTRN MQERYI2: NEAR : 


3 The following lines raise REAL _Y to INT POWER 
3 and store the result in REAL_OUTPUT. 


FLD REAL_Y 3 push, ST := REAL_Y 
MOV AX, INT POWER 3 AX := INT POWER 

CALL MQERYI2 5 ST := ST**AX 

FSTP REAL_OUTPUT 3; Store result, pop ST. 


3 REAL_OUTPUT is now about 10.6045. 


Oo 
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maerYI4 
Returns real number 
raised to a short integer power 


i) Function 


*) 


ST := STFAX 
Result := y’ if -«© < y < + and -2,147,483,648 < j < +2,147,483,647 
(-23! < j < +23" - 1)) as follows: 


e Result := 1.0 if j =0 

e Result := +0 if y = +0, j > 0, and j is even 

e Result := y if y = +0, j > 0, and j is odd 

e Result = y! if 0 < y < +~and -271 <j <0 or0<js +2"! - 1) 
° Result :=|y |) if -» < y <0, j «0, and j is even 

e Result := -(| y 1) if -© < y < 0 and j is odd 


Discussion 


mgerYI4 returns y), where y is a real number and j is a 32-bit 
integer, expressed in two’s complement. If j = 0, mqerYI4 returns 
+1.0, whatever the value of y. 


For finite y > 0, mqerYI4 returns: 

‘ 2(i*log_base_2¢y)) if | j [> 63 

e yi if 1 < j s 63 by successively squaring and multiplying y to 
compute the correct power 

e yj if -63 <j <-1 by evaluating one of two possible expressions: 


e l/ (y! j l) provided that the denominator would not cause 
numeric overflow or underflow 


° (1/y)! il otherwise 
For finite y < 0, mqerYI4 first computes | y iY as for finite y > 0. 


Then, it determines the sign of the result according to whether j is 
even (+) or odd (-). 
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maerYI4 (continued) 
For | j | < 63, mqerYI4 performs no more than nine multiplications in 
evaluating (y*y *(y*y) ...*(y*...*y)) with its squaring-and-multiplying 
algorithm. 
maerYI4 accepts input y = + or y = +0 and returns: oO 
e +o if y=+oandj>0 
e +0 if y=+o0andj<0 
e +0 if y = -~, j > 0, and j is even 
e -0 if y = -«, j > 0, and j is odd 
e +0 if y = -0, j < 0, and j is even 
e -0 if y = -«, j < 0, and j is odd 
e +0 if y = +0, j > 0, and j is even 
e yif y = +0, j > 0, and j is odd 


Exceptions 


Underflow: 


I Input y = SNaN causes the I exception. If I is masked, mqerYI4 
returns the QNaN indefinite. If I is unmasked, control passes to 
the exception handler with the input y in ST(1), the input j in ST, 
and the exception opcode set. 


Possible exceptions are Invalid, Denormal, Zerodivide, Overflow, and oO 


D Input denormals cause the D exception. If D is masked, mqerYI4 
returns its result. If D is unmasked, control passes to the 
exception handler with the input y in ST(1), the input j in ST, 
and the exception opcode set. 


Z Input y = +0 with j < 0 causes the Z exception. If Z is masked, 
mgerYI4 returns © with the same sign as y. If Z is unmasked, 
control passes to the exception handler with the input y in ST(1), 
the input j in ST, and the exception opcode set. 


O A y? whose exponent is too large to be represented in the 
extended format causes the O exception. If O is masked, mqerYI4 
returns © with the same sign as the true result. If O is unmasked, 
control passes to the exception handler with the input y in ST(1), 
the input j in ST, and the exception opcode set. 
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mqaerYI4 (continued) 


U Aly! | too tiny to fit accurately in extended format causes the U 
exception if U is masked. In this case, mgerYI4 returns a gradual 
underflow denormal, if possible; otherwise, it returns +0. A | y? | 
less than the smallest positive normalized number causes the U 
exception if U is unmasked. In this case, control passes to the 

Oo exception handler with the input y in ST(1), the input j in ST, 
and the exception opcode set. 


Exception Opcode 


27CH 


Example 


maerYI4 raises a real number y on the 80387 stack to the power of a 
32-bit integer in the EAX register. Its results fall in the range of 
finite, representable nurnbers or its results are +o. 


; : ; in DATA segment 
INT POWER DD 9 3; initialized 
oO REAL Y DQ 2.3 ; to test values 
REAL OUTPUT DQ ? 


: : s in CODE32 segment 
EXTRN MQERYI4: NEAR 


3 The following lines raise REAL_Y to INT POWER 
3 and store the result in REAL OUTPUT. 


FLD REAL_Y 3 push, ST := REAL_Y 
MOV EAX, INT POWER ; EAX := INT POWER 
CALL MQERYI4 3 ST := ST**EAX 

FSTP REAL_OUTPUT 3 Store result, pop ST. 


3 REAL_OUTPUT is now about 1801.15. 


* 
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maerY18 
Returns real number 
raised to a long integer power 


Function oO 


ST := STEOX_EAX 
Result := y! if -o < y < + and -2 <j< +(23 - 1) as follows: 


e Result := 1.0 if j=0 

e Result := +0 if y = +0, j > 0, and j is even 

e Result := y if y = +0, j > 0, and j is odd 

° Result := y/ if 0 < y < +@ and -2% <j <0 or 0 <j < +(2% - 1) 


e Result :=| y |) if -0 < y <0, j «0, and j is even 


e Result := -(| y |) if -« < y < 0 and j is odd 
Discussion 
maerYI8 returns y), where y is a real number and j is a 64-bit oO 


integer, expressed in two’s complement. If j = 0, mqerYI8 returns 
+1.0, whatever the value of y. 


For finite y > 0, mqerYI8 returns: 
- 2(i*log_base_2¢y)) if | jl > 63 


e y) if | < j < 63 by successively squaring and multiplying y to 
compute the correct power . 


) yj if -63 < j < -1 by evaluating one of two possible expressions: 


e 1/ (y! j l) provided that the denominator would not cause 
numeric overflow or underflow 


e (1/y)! i | otherwise 
For finite y < 0, mqerYI8 first computes | y J as for finite y > 0. 


Then, it determines the sign of the result according to whether j is oO 
even (+) or odd (-). 
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mqaerYI8 (continued) 


For | j | < 63, mqerYI8 performs no more than nine multiplications in 
evaluating (y*y *(y*y) ...*(y*...*y)) with its squaring-and-multiplying 
algorithm. 


mqaerYI8 accepts input y = t~ or y = +0 and returns: 


+o if y= +~ and j >0 

+0 if y= +~ andj <0 

+o if y = -~, j > 0, and j is even 
-o if y = -~, j > 0, and j is odd 
+0 if y = -~, j < 0, and j is even 
-0 if y = -~, j < 0, and j is odd 
+0 if y = +0, j > 0, and j is even 
y if y = +0, j > 0, and j is odd 


Exceptions 
Possible exceptions are Invalid, Denormal, Zerodivide, Overflow, and 
Underflow: 
I Input y = SNaN causes the I exception. If I is masked, mqerYI8 


returns the QNaN indefinite. If I is unmasked, control passes to 
the exception handler with the input y in ST(1), the input j in ST, 
and the exception opcode set. 


Input denormals cause the D exception. If D is masked, mqerY18 
returns its result. If D is unmasked, control passes to the 
exception handler with the input y in ST(1), the input j in ST, 
and the exception opcode set. 


Input y = +0 with j < 0 causes the Z exception. If Z is masked, 
mqaerYI8 returns @ with the same sign as y. If Z is unmasked, 
control passes to the exception handler with the input y in ST(1), 
the input j in ST, and the exception opcode set. 


A y? whose exponent is too large to be represented in the 
extended format causes the O exception. If O is masked, mqerY18 
returns © with the same sign as the true result. If O is unmasked, 
control passes to the exception handler with the input y in ST(1), 
the input j in ST, and the exception opcode set. 
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maerYI8 (continued) 


U Aly’ | too tiny to fit accurately in extended format causes the U 
exception if U is masked. In this case, mqerYI8 returns a gradual 
underflow denormal, if possible; otherwise, it returns +0. A | y? | 
less than the smallest positive normalized number causes the U 
exception if U is unmasked. In this case, control passes to the oO 
exception handler with the input y in ST(1), j in ST, and the 
exception opcode set. 


Exception Opcode 


27CH 


Example 


maerYI8 raises a real number y on the 80387 stack to the power of a 
64-bit integer in the EDX (most significant digits) and EAX (least 
significant digits) registers. Its results fall in the range of finite, 
representable numbers or its results are +o, 


: : ; in DATA segment 
INT_POWER DQ 9 5 initialized oO 
REAL Y DQ 3.3 3; to test values 


REAL_OUTPUT DQ ? 


: : ; in CODE32 segment 
EXTRN MQERYI8: NEAR 


3 The following lines raise REAL_Y to INT POWER 
3 and store the result in REAL OUTPUT. 


FLD REAL_Y ; push, ST := REAL_Y 
MOV EAX, DWORD PTR INT POWER 
s EAX : 


" 


lower_4 bytes( 
; INT_POWER) 
MOV EDX, DWORD PTR INT POWER+4 


; EDX := upper 4 bytes( 

$ INT POWER) 
CALL MQERYI8 3 ST := ST**EDX_EAX oO 
FSTP REAL OUTPUT ; Store result, pop ST. 


3 REAL_OUTPUT is now about 46411.5. 
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mqaerYIS 
Returns real number 
raised to a short integer power 


oO Function 


Oo 


ST := sT(top_4_bytes_80386_stack) eo st (dword ptr SS:ESP) 


Result := y! if -o < y < +o and -2,147,483,648 < j < +2,147,483,647 
(-231 < j s +2" - 1)) as follows: 


e Result := 1.0 if j =0 

e Result := +0 if y = +0, j > 0, and j is even 

e Result := y if y = +0, j > 0, and j is odd 

e Result := y! if 0 < y < +e and -23! <j <0 or 0 <j <+(2"" - 1) 
e Result := | y | if -~ < y < 0, j x 0, and j is even 

e Result := -(| y p) if -o < y < 0 and j is odd 


Discussion 


mgerYIS returns y, where y is a real number and j is a 32-bit integer 
expressed in two’s complement and pushed on the 80386 stack. If j = 
0, mgerYIS returns +1.0, whatever the value of y. 


For finite y > 0, mqerYIS returns: 

A 2(i*log_base_2(y)) if | j| > 63 

e yj if 1 <j < 63 by successively squaring and multiplying y to 
compute the correct power 

e yi if -63 <j < -1 by evaluating one of two possible expressions: 


e 1/ (y! j l) provided that the denominator would not cause 
numeric overflow or underflow 


° (/y)! i | otherwise 
For finite y < 0, mqerYIS first computes | y J as for finite y > 0. 


Then, it determines the sign of the result according to whether j is 
even (+) or odd (-). 
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mqaerYIS (continued) 
For | j | < 63, mqerYIS performs no more than nine multiplications in 
evaluating (y*y *(y*y) ...*(y*...*y)) with its squaring-and-multiplying 
algorithm. 
mgaerYIS accepts input y = +o or y = +0 and returns: oO 
e +0if y= +0and j>0 
e +0 if y=+oandj<0 
e +0 if y = -~, j > 0, and j is even 
e -o if y = -~, j > 0, and j is odd 
e +0 if y = -«, j <0, and j is even 
e -0 if y = -~, j <0, and j is odd 
e +0 if y = +0, j > 0, and j is even 
e y if y = +0, j > 0, and j is odd 


Exceptions 


Possible exceptions are Invalid, Denormal, Zerodivide, Overflow, and 
Underflow: 


I Input y = SNaN causes the I exception. If I is masked, mqerYIS 
returns the QNaN indefinite. If I is unmasked, control passes to 
the exception handler with the input y in ST(1), the input j in ST, 
and the exception opcode set. 


D_ Input denormals cause the D exception. If D is masked, mqerYIS 
returns its result. If D is unmasked, control passes to the 
exception handler with the input y in ST(1), the input j in ST, 
and the exception opcode set. 


Z Input y = +0 with j < 0 causes the Z exception. If Z is masked, 
maerYIS returns ~ with the same sign as y. If Z is unmasked, 
control passes to the exception handler with the input y in ST(1), 
the input j in ST, and the exception opcode set. 


O Ay! whose exponent is too large to be represented in the 
extended format causes the O exception. If O is masked, mqerYIS oO 
returns © with the same sign as the true result. If O is unmasked, 
control passes to the exception handler with the input y in ST(1), 
the input j in ST, and the exception opcode set. 
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mqaerYIS (continued) 


U Al yi | too tiny to fit accurately in extended format causes the U 


exception if U is masked. In this case, mqerYIS returns a gradual 
underflow denormal, if possible; otherwise, it returns +0. A | y? | 
less than the smallest positive normalized number causes the U 
exception if U is unmasked. In this case, control passes to the 
exception handler with the input y in ST(1), the input j in ST, 
and the exception opcode set. 


Exception Opcode 


27CH 


mqaerYIS raises a real number on the 80387 stack to the power of a 
32-bit integer on the 80386 stack. Its results fall in the range of 
finite, representable numbers or its results are +e. 


A . ; in DATA segment 
INTEREST RATE DQ 0.015 3; initialized 
MONTHS DD 12 3; to test 
START_AMT DQ 1000.00 ; values 

FINISH AMT DQ ? 


: : ; in CODE32 segment 
EXTRN MQERYIS: NEAR 


; The following lines compound interest 
3 on START_AMT for a year at 1.5% per month. 


FLD1 ; push, ST := 1.0 

FADD INTEREST RATE ST := ST+0.015 

PUSH MONTHS 32-bit integer exponent 
pushed onto 80386 stack 

ST := ST**(DWORD PTR SS:ESP) 
(ST := 1.015**MONTHS) 

ST := ST*START_AMT 

(Scale by $1000.) 

Store result, pop ST. 


CALL MQERYIS 


FMUL START_AMT 


we we we we we ws we we we 


FSTP FINISH AMT 


; FINISH_AMT is now about $1195.62. Note that mgerYIS 
3 pops the exponent from the 80386 stack. 
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3.3 CL387 Complex Functions 


The complex functions are a subset of the Common Elementary 
Function Library. This section contains: 


e A summary of the CL387 complex functions a) 
e Some basic information about complex functions and numbers 
e Information about how to read each function’s reference pages 


e A comprehensive reference for each CL387 complex function in 
alphanumeric order 


3.3.1 Summary of CL387 Complex Functions 
Table 3-3 summarizes the CL387 complex functions. 


Table 3-3 Common Elementary Complex Functions 


Compute Logarithms and Exponentials: 


Name Function Description a) 
mqerCLGE _Ln(z) Natural (base e) logarithms 
mqerCEXP e?” Exponential function 
mgerCC2C w? Raises complex w to complex power z 
mgerCC2R 2% Raises complex z to real power x 
mqgerCR2C x ‘ Raises real x to complex power z 
mgerCCIS  z? Raises complex z to power of 32-bit 

; integer on 80386 stack 
mgerCCl2 2? Raises complex z to power of 16-bit 

: integer in AX 
mgerCCl4 2! Raises complex z to power of 32-bit 

: integer in EAX 
mgerCCl8z? Raises complex z to power of 64-bit 


integer in EDX_EAX 


Oo 
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Table 3-3 Common Elementary Complex Functions (continued) 


Name 


mqaerCSIN 

mgerCCOS 
mqaerCTAN 
mqaerCASN 


mqaerCACS 
mqaqerCATN 
maqerCSNH 
mqaqerCCSH 
mqaerCTNH 
mqerCASH 
maqerCACH 


mqgerCATH 


Name 
mqgerCPOL 


mqaerCREC 


Function 


sin(z) 
cos(z) 
tan(z) 
Arcsin(z) 


Arccos(z) 
Arctan(z) 
sinh(z) 
cosh(z) 
tanh(z) 


Arcsinh(z) 
Arccosh(z) 


Arctanh(z) 


Convert Complex Representations: 


Function 
(op_rad,op_arg) 


(z_re,z_im) 
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Compute Trigonometrics and Hyperbolics: 


Description 


Trigonometric sine 

Trigonometric cosine 

Trigonometric tangent 

Trigonometric inverse sine’s principal 
value 

Trigonometric inverse cosine’s principal 
value 

Trigonometric inverse tangent’s principal 
value 

Hyperbolic sine 

Hyperbolic cosine 

Hyperbolic tangent 

Hyperbolic inverse sine’s principal value 
Hyperbolic inverse cosine’s principal 
value 

Hyperbolic inverse tangent’s principal 
value 


Description 
Converts rectangular to polar 
representation 


Converts polar to rectangular 
representation 
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Table 3-3 Common Elementary Complex Functions (continued) 
Return Other Values: 


Name Function Description 

mgqerCMUL w*z Complex multiplication #) 
mgerCDIV w/z Complex division 

mgqerCABS | z] Complex absolute value (real magnitude) 
maerCSQR _sqrt(z) Complex square root 

mgerCPRJ z:=(~, +0) Maps square at infinity to (infinity, zero 


with z_im’s sign) 


3.3.2 Complex Functions and Compiex Numbers 


Complex functions extend the domain and range of the common real- 
valued functions to the entire complex number plane. 


The field of complex numbers can be represented as plane with real 
and imaginary axes. Figure 3-2 shows the complex plane with a Oo 
complex number z in rectangular representation. 
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Imaginary 
Axis 


+00 


rectangular(z_re,z_im) 


Real 


43 
© Axis 


PCDO0003 


Figure 3-2 Rectangular Graph of a Complex Number 


The algebraic representation of a complex number z is x + iy. The 
imaginary component (i) has the following property: i 25-1, 


This chapter uses the rectangular representation z = (z_re, z_im) 
where the real and imaginary components of z are an ordered pair of 
real numbers. Most CL387 complex functions require at least two 
input arguments in rectangular representation. 


This chapter also uses the polar—or circular—representation z = 
(op_rad, op_arg), where the radial and angular components of z are 
an ordered pair of real numbers. Op_rad is the magnitude of z, 
shown graphically as the line segment from the origin to z. Op_rad 
is always a non-negative number, defined as the square root of (z_re* 
+ z_im*). Op_arg is the principal value of the angle from the 
positive real axis to the radial line segment. Op_arg is always an 
angle expressed in radians such that -x < op_arg < +n. 


Figure 3-3 shows the complex plane with a complex number z in 
polar representation. 
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Figure 3-3 Polar Graph of a Complex Number 


3.3.3 How to Read the Complex Function Reference Pages 
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The reference pages for each complex function have five sections: 


1. 


Function summarizes the result and input arguments for each 
function in two different ways. The first line uses 80387 stack 
position notation. Subsequent lines use mathematical notation. 


For example, (ST, ST(1)) := ST(2)°S™ $™")) indicates that a real 
input in ST(2) is raised to the power of the complex input 
components in ST and ST(1) and that the components of the 
complex result are left in ST and ST(1). 


The second line uses (Re_ Result, Im_Result), x, and (z_re, 
z_im) to indicate the same thing mathematically, as (Re_ Result, 
Im_Result) := x‘%"e iM _ x 2. Subsequent lines sometimes 
summarize the range for a component of the result. 


Discussion explains the function in more detail. This section uses 
the mathematical notation of the Function section. Ranges 
expressed as a..b are inclusive: a and b are part of the range. 
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oO 


3. Exceptions first summarizes which exceptions the function can 
report. Then, it explains what causes each exception and how the 
function handles the masked and unmasked cases. 


4. Exception Opcode has the hexadecimal value the function stores in 
the Opcode field of the 80387 state if the function generates a 
trap (see Table 3-1). 


5. Example has a commented ASM386 example that shows how to 
declare the function for linkage with CL387N.LIB (see Section 
3.1.1), how to set up the function’s arguments (push order, register 
load, or both), how to call the function, and how to store the 
results. 


3.3.4 CL387 Complex Function Reference 
The remaining pages in this section are a comprehensive reference for 


each Common Elementary Library complex function. The functions 
are in alphanumeric order. 
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mqerCABS 


Returns absolute value 
of complex number 


Function oO 


ST := | (ST, ST(1)) | 
RealResult := | (z_re, z_im) | =|z| 


Discussion 
maerCABS returns the absolute value (magnitude) of the complex 


number z whose components are (z_re, z_im). The absolute value is 
a real number defined mathematically by the equation: 


[Zz] = obese 
zré +z int 


The magnitude of a complex number represents the distance in the 


complex plane between z and the origin as shown in Figure 3-4. O 
Imaginary 
Axis 
(z_re,z_im) 
|z|-, 
Real 
0 Axis 
PCD0005 oO 
Figure 3-4 Absolute Value of a Complex Number 
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mgerCABS (continued) 


Exceptions 
Possible exceptions are Invalid, Denormal, Overflow, Underflow, and 
Precision: 
oO I Input SNaNs cause the I exception. If I is masked, mqerCABS 


returns the QNaN indefinite. If I is unmasked, control passes to 
the exception handler with the input z_im still in ST(1), z_re still 
in ST, and the exception opcode set. 


D Input denormals cause the D exception. If D is masked, 
mqerCABS returns its result. If D is unmasked, control passes to 
the exception handler with z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 


O maerCABS defends against spurious overflow when computing 
(z_1 re? + z_im 2), However, a result whose exponent is too large 
to fit in extended format causes the O exception. If O is masked, 
mqaerCABS returns +. If O is unmasked, control passes to the 
exception handler with z_im still in ST(1), z_re still in ST, and 
the exception opcode set. 


U Computing (z_re® + z_im?) where | z_re | and | z_im | are both 

#) very close to zero can produce an intermediate result whose square 
root is so tiny that it cannot be represented accurately in extended 
format. If U is masked, this causes the U exception and 
maerCABS returns a gradual underflow denormal, if possible; 
otherwise, it returns +0. If U is unmasked, a result whose 
absolute value is too tiny to be represented as a normalized 
number causes the U exception. In this case, control passes to the 
exception handler with z_im still in ST(1), z_re still in ST, and 
the exception opcode set. 


P_ An inexact (P exception) might be signaled due to the rounding of 
intermediate results even though the final result is exact. 
However, if no P exception occurs, the result is exact. 


Exception Opcode 


Oo 283H 
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maqerCABS (continued) 
Example 
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maerCABS returns the absolute value of a complex number z with 
components (z_re, z_im); its result is an extended format real. 


ZRE DT 3.0 
ZIM DT 4.0 
ABS VAL_Z DT 2 


EXTRN MQERCABS: NEAR 


. 
> 
. 
> 
. 
> 


in DATA segment 
initialized 
to test values 


3 in CODE32 segment 


; The following lines compute the real absolute value 
; (magnitude) of the complex number (Z_RE, Z_IM) 
3 and store the result in ABS VAL Z. 


FLD Z_IM 
FLD ZRE 
CALL MQERCABS 
FSTP ABS VAL _Z 


; ABS_VAL_Z = 5.0 


. 
2 
> 
> 
. 
> 


push, ST := Z_IM 

push, ST := Z RE 

ST := | (ST,ST(1)) | 
Store result, pop stack. 


Common Elementary Function Library 


Oo 


Oo 


Oo 


mqerCACH 
Returns complex 
hyperbolic Arc cosine 


oO Function 


Oo 


(ST, ST(1)) := Arccosh(ST, ST(1)) 
(Arccosh_Re, Arccosh_Im) := Arccosh(z_re, z_im) 
= Arccosh(z) with -x < Arccosh_Im < +n 


Discussion 


mqgerCACH returns the principal value of the complex hyperbolic arc 
cosine for the complex number z with real and imaginary components 
(z_re, z_im). The imaginary component of its result falls in the 
range -7..+7. 


The mathematical definition for Arccosh(z) (or cosh"! z) is the 
complex integral: 


dt 


| 2 
1 t*-1 


The path of integration must not cross the real axis, except possibly in 


Arccosh(z) = 


the interval +1.0 < z_re < +, 


Figure 3-5 shows the domain of Arccosh(z) with points B’ = (-1,-0), 
Z’ = (+0,-0), A = (+1,+0), Z = (40,40), and B = (-1,+0) on the branch 
cuts. Figure 3-6 shows the image of the domain under Arccosh(z). 
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mqerCACH (continued) 


Imaginary 
Axis 


PCD0006 


Figure 3-5 Domain of Arccosh(z) with Branch Cuts 


Imaginary 7 oO 


Axis 
B 
rie 
x z 
2 
A Real 
0 Axis 
Ba, 
2 Z 
B 


-T ana 


PCD0007 oO 


Figure 3-6 Range of Arccosh(z) 
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magerCACH (continued) 


Exceptions 


Possible exceptions are Invalid, Denormal, Overflow, and Underflow: 


I 


Input SNaNs cause the I exception. If I is masked, mqerCACH 
returns the QNaN indefinite to affected components of the result. 
If I is unmasked, control passes to the exception handler with the 
input z_im still in ST(1), z_re still in ST, and the exception 
opcode set. 


Input denormals cause the D exception. If D is masked, 
mqerCACH returns its result. If D is unmasked, control passes to 
the exception handler with z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 


Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
mqerCACH returns + to affected components of the result. If O 
is unmasked, control passes to the exception handler with z_im 
still in ST(1), z_re still in ST, and the exception opcode set. 


Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
maqerCACH returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im still in 
ST(1), z_re still in ST, and the exception opcode set. 


Exception Opcode 


3A2H ‘ 
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mqerCACH (continued) 
Example 


3-102 


mqerCACH returns Arccosh(z_re, z_im) for the complex number z; 
the imaginary component of its result falls in the range —7..+7. 


Z.RE OT 1.0 
Z_IM DT 3.0 
ARCCOSH_RE DT ? 
ARCCOSH_IM DT ? 


EXTRN MQERCACH: NEAR 


in DATA segment 
initialized 
to test values 


s in CODE32 segment 


3 The following lines compute Arccosh(Z_RE,Z_IM) and 
; store the real and imaginary components of the 
3 result in ARCCOSH_RE and ARCCOSH_IM. 


FLD Z_IM 
FLD Z_RE 
CALL MQERCACH 


FSTP ARCCOSH_RE 
FSTP ARCCOSH_IM 


. 
> 
. 
> 
. 
> 
. 
> 
> 
. 
> 
. 
> 


push, ST : 
(ST,ST(1)) := 
Arccosh(ST,ST(1)) 


; Store real component, pop ST 


Store imaginary component, 
pop ST. 


s ARCCOSH RE is about 1.8642. 
3 ARCCOSH_IM is about 1.2632. 


Common Elementary Function Library 


* 


oO 


mgerCACS 


Returns complex Arc cosine 


Oo Function 


(ST, ST(1)) := Arccos(ST, ST(1)) 
(Arccos_Re, Arccos_Im) := Arccos(z_re, z_ im) 
= Arccos(z) with 0 < Arccos_Re < +a 


Discussion 


mqerCACS returns the principal value of the complex arc cosine for 
the complex number z with real and imaginary components (z_re, 
z_im). The real component of its result falls in the range 0..+7. 


The mathematical definition for Arccos(z) (or cos”! z) is the complex 
integral: 


dt 
a) Arccos(z) = —_—— 
| 2 
3 1-t 


The path of integration must not cross the real axis, except possibly in 
the interval -1.0 < z_re < +1.0. 


Figure 3-7 shows the domain of Arccos(z) with points C = (x,+0), B = 
(-1,40), C’ = (x,-0), D = (x,4+0), A = (41,40), and D’ = (x,-0) on the 
branch cuts. Figure 3-8 shows the image of the domain under 
Arccos(z). 
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mqerCACs (continued) 


Imaginary 
Axis 


PCD0008 


Figure 3-7 Domain of Arccos(z) with Branch Cuts 
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Figure 3-8 Range of Arccos(z) 
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oO 


Oo 


mgerCACS (continued) 
Exceptions 


Possible exceptions are Invalid, Denormal, Overflow, and Underflow: 


I Input SNaNs cause the I exception. If I is masked, mqerCACS 
returns the QNaN indefinite to affected components of the result. 
If I is unmasked, control passes to the exception handler with the 
input z_im still in ST(1), z_re still in ST, and the exception 
opcode set. 


D_ Input denormals cause the D exception. If D is masked, 
mqaerCACS returns its result. If D is unmasked, control passes to 
the exception handler with z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 


O Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
maerCACS returns +~ to affected components of the result. If O 
is unmasked, control passes to the exception handler with z_im 
still in ST(1), z_re still in ST, and the exception opcode set. 


U_ Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
mgerCACS returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im still in 
ST(1), z_re still in ST, and the exception opcode set. 


Exception Opcode 


3A1H 
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maerCACS (continued) 
Example 


3-106 


maerCACS returns Arccos(z_re, z_im) for the complex number z; the 
real component of its result falls in the range 0..+7. 


ZRE DT 1.0 
ZIM DT 3.0 
ARCCOS RE DT ? 
ARCCOS_IM DT ? 


EXTRN MQERCACS: NEAR 


in DATA segment 
initialized 
to test values 


s in CODE32 segment 


; The following lines compute Arccos(Z_RE, Z_IM) and 
3 store the real and imaginary components of the 
3 result in ARCCOS RE and ARCCOS_IM. 


FLD Z_IM 
FLD Z_RE 
CALL mgerCACS 


FSTP ARCCOS_RE 
FSTP ARCCOS_IM 


; ARCCOS RE is about 1.2632. 


we we we we we we we 


push, ST := Z_IM 

push, ST := Z_RE 

(ST,ST(1)) := 
Arccos(ST,ST(1)) 


Store real component, pop ST 
Store imaginary component, 
pop ST. 


; ARCCOS_IM is about -1.8642. 


Common Elementary Function Library 


*) 


Oo 


Oo 


mqerCASH 
Returns complex 
hyperbolic Arc sine 


oO Function 


* 


(ST, ST(1)) := Arcsinh(ST, ST(1)) 
(Arcsinh_Re, Arcsinh_Im) := Arcsinh(z_re, z_im) 
= Arcsinh(z) with -x/2 < Arcsinh_Im < +n/2 


Discussion 


mqaerCASH returns the principal value of the complex hyperbolic arc 
sine for the complex number z with real and imaginary components 
(z_re, z_im). The imaginary component of its result falls in the 
range -2/2..+7/2. 


The mathematical definition for Arcsinh(z) (or sinh”! z) is the 
complex integral: 
dt 


| 2 
0 1+t 


The path of integration must not cross the imaginary axis, except 
possibly in the interval -1.0 < z_im < +1.0. 


Arcsinh(z) = 


Figure 3-9 shows the domain of Arcsinh(z) with the points C = (-0,x), 
B = (-0,-1), A = (+0,+1), and D = (+0,x) on the branch cuts. Figure 
3-10 shows the image of the domain under Arcsinh(z). 
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maerCASH (continued) 


Imaginary Axis 


PCD0010 


Figure 3-9 Domain of Arcsinh(z) with Branch Cuts 
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Figure 3-10 Range of Arcsinh(z) 
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* 


mgerCASH (continued) 


Exceptions 


Possible exceptions are Invalid, Denormal, Overflow, and Underflow: 


I 


Input SNaNs cause the I exception. If I is masked, mqerCASH 
returns the QNaN indefinite to affected components of the result. 
If I is unmasked, control passes to the exception handler with the 
input z_im still in ST(1), the input z_re still in ST, and the 
exception opcode set. 


Input denormals cause the D exception. If D is masked, 
maerCASH returns its result. If D is unmasked, control passes to 
the exception handler with z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 


Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
mgerCASH returns + to affected components of the result. If O 
is unmasked, control passes to the exception handler with z_im 
still in ST(1), z_re still in ST, and the exception opcode set. 


Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
mgerCASH returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im still in 
ST(1), z_re still in ST, and the exception opcode set. 


Exception Opcode 


3A0H 
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maqerCASH (continued) 
Example 


mqerCASH returns Arcsinh(z_re, z_im) for the complex number 2; 
the imaginary component of its result falls in the range —2/2..+7/2. 


; in DATA segment #] 


ZRE DT 1.0 3 initialized 
Z_IM DT 3.0 ; to test values 
ARCSINH_RE DT ? 

ARCSINH_IM DT ? 


7 : ; in CODE32 segment 
EXTRN mqerCASH: NEAR 


3 The following lines compute Arcsinh(Z_RE,Z_IM) and 
; store the real and imaginary components of the 
3 result in ARCSINH RE and ARCSINH_IM. 


FLD Z_IM 3 push, ST := Z_IM 
FLD Z_RE 3 push, ST := Z_RE 
CALL mqerCASH 3 (ST, ST(1)) : = 
; Arcsinh(ST,ST(1)) oO 
FSTP ARCSINH RE ; Store real component, pop ST 
FSTP ARCSINH_IM ; Store imaginary component, 


s pop ST. 


; ARCSINH_RE is about 1.8242. 
3 ARCSINH_IM is about 1.2331. 
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mqerCASN 


Returns complex Arc sine 


Function 
#] (ST, ST(1)) = Arcsin(ST, ST(1)) 


(Arcsin_Re, Arcsin_Im) := Arcsin(z_re, z_im) 
= Arcsin(z) with -1/2 < Arcsin_Re < +x/2 


Discussion 


maerCASN returns the principal value of the complex arc sine for the 
complex number z with real and imaginary components (z_re, z_im). 
The real component of its result falls in the range -2/2..+7/2. 


The mathematical definition for Arcsin(z) (or sin’’ z) is the complex 
integral: 


dt 
oO Arcsin(z) = -—_--——— 
| 2 
0 1-t 


The path of integration must not cross the real axis, except possibly in 
the interval -1.0 < z_re < +1.0 


Figure 3-11 shows the domain of Arcsin(z) with the points C = (x,+0), 


B = (-1,+0), A = (+1,-0), and D = (x,-0) on the branch cuts. Figure 
3-12 shows the image of the domain under Arcsin(z). 
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maerCASN (continued) 


Imaginary Axis 


PCD0012 


Figure 3-11 Domain of Arcsin(z) with Branch Cuts 
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Figure 3-12 Range of Arcsin(z) 
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Oo 


o 


*) 


maerCASN (continued) 
Exceptions 


Possible exceptions are Invalid, Denormal, Overflow, and Underflow: 


I Input SNaNs cause the I exception. If I is masked, mqerCASN 
returns the QNaN indefinite to affected components of the result. 
If I is unmasked, control passes to the exception handler with the 
input z_im still in ST(1), the input z_re still in ST, and the 
exception opcode set. 


D Input denormals cause the D exception. If D is masked, 
maerCASN returns its result. If D is unmasked, control passes to 
the exception handler with z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 


O Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
mqaerCASN returns += to affected components of the result. If O 
is unmasked, control passes to the exception handler with z_im 
still in ST(1), z_re still in ST, and the exception opcode set. 


U_ Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
mqaerCASN returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns -40. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im still in 
ST(1), z_re still in ST, and the exception opcode set. 


Exception Opcode 


39FH 
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mgerCASN (continued) 
Example 


3-114 


maerCASN returns Arcsin(z_re, z_im) for the complex number z; the 
real component of its result falls in the range —1/2..+7/2. 


ZRE DT 1.0 
ZIM DT 3.0 
ARCSIN RE DT ? 
ARCSIN_IM DT ? 


EXTRN MQERCASN: NEAR 


> 
> 
> 


in DATA segment 
initialized 
to test values 


3 in CODE32 segment 


; The following lines compute Arcsin(Z_RE,Z_IM) and 
3 store the real and imaginary components of the 
3 result in ARCSIN RE and ARCSIN IM. 


FLD Z_IM 
FLD Z RE 
CALL MQERCASN 


FSTP ARCSIN_RE 
FSTP ARCSIN_IM 


; ARCSIN RE is about 0.3076. 
3 ARCSIN_IM is about 1.8642. 


> 
> 
> 


> 
> 
5 
> 


push, ST : 
(ST,ST(1)) := 
Arcsin(ST,ST(1)) 
Store real component, pop ST 
Store imaginary component, 


3 pop ST. 
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* 


oO 


*) 


* 


mqerCASN (continued) 
Exceptions 


Possible exceptions are Invalid, Denormal, Overflow, and Underflow: 


I Input SNaNs cause the I exception. If I is masked, mqerCASN 
returns the QNaN indefinite to affected components of the result. 
If I is unmasked, control passes to the exception handler with the 
input z_im still in ST(1), the input z_re still in ST, and the 
exception opcode set. 


D Input denormals cause the D exception. If D is masked, 
maerCASN returns its result. If D is unmasked, control passes to 
the exception handler with z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 


O Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
maerCASN returns +~ to affected components of the result. If O 
is unmasked, control passes to the exception handler with z_im 
still in ST(1), z_re still in ST, and the exception opcode set. 


U Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
maerCASN returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im still in 
ST(1), z_re still in ST, and the exception opcode set. 


Exception Opcode 


39FH 
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mgqerCASN (continued) 
Example 


mqaerCASN returns Arcsin(z_re, z_im) for the complex number z; the 
real component of its result falls in the range —7/2..+7/2. 


s in DATA segment ae) 


ZRE DT 1.0 3 initialized 
ZIM DT 3.0 ; to test values 
ARCSIN RE DT ? 

ARCSIN IM DT ? 


i : 3; in CODE32 segment 
EXTRN MQERCASN: NEAR 


3; The following lines compute Arcsin(Z_RE,Z_IM) and 
3 store the real and imaginary components of the 
3 result in ARCSIN RE and ARCSIN IM. 


FLD Z_IM ; push, ST := Z_IM 
FLD Z_RE 3 push, ST := Z_ RE 
CALL MQERCASN 5 (ST; ST(1)) : 
; Aresin(ST,ST(1)) oO 
FSTP ARCSIN_RE ; Store real component, pop ST 
FSTP ARCSIN_IM ; Store imaginary component, 
$ pop ST. 


; ARCSIN RE is about 0.3076. 
3 ARCSIN IM is about 1.8642. 


oO 
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Oo 


maerCATH (continued) 


Exceptions 


Possible exceptions are Invalid, Denormal, Overflow, and Underflow: 


I 


Input SNaNs cause the I exception. If I is masked, mqerCATH 
returns the QNaN indefinite to affected components of the result. 
If I is unmasked, control passes to the exception handler with the 
input z_im still in ST(1), z_re still in ST, and the exception 
opcode set. 


Input denormals cause the D exception. If D is masked, 
maerCATH returns its result. If D is unmasked, control passes to 
the exception handler with z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 


Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
magerCATH returns + to affected components of the result. If O 
is unmasked, control passes to the exception handler with z_im 


* still in ST(1), z_re still in ST, and the exception opcode set. 


Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
mqerCATH returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im still in 
ST(1), z_re still in ST, and the exception opcode set. 


Exception Opcode 


3A4H 
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magerCATH (continued) 
Example 


mgerCATH returns Arctanh(z_re, z_im) for the complex number z; 
the imaginary component of its result falls in the range —1/2..+7/2. 


5 K ; in DATA segment 
ZRE DT 1.0 3; initialized 
ZIM DT 3.0 ; to test values 
ARCTANH RE DT ? 

ARCTANH_IM DT ? 


: : ; in CODE32 segment 
EXTRN MQERCATH: NEAR 


3 The following lines compute Arctanh(Z_RE,Z_IM) and 
3; store the real and imaginary components of the 
3 result in ARCTANH RE and ARCTANH_IM. 


FLD Z_IM 
FLD Z_RE 
CALL MQERCATH 


push, ST : 
push, ST := Z| 
(ST,ST(1)) := 

Arctanh(ST,ST(1)) O 
Store real component, pop ST 
Store imaginary component, 
pop ST. 


Z_IM 
Z_RE 


FSTP ARCTANH_ RE 
FSTP ARCTANH_IM 


we we we we we we we 


3 ARCTANH RE is about 0.0919. 
3 ARCTANH_IM is about 1.2768. 
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maqerCATN 


Returns complex Arc tangent 


Function 


oO (ST, ST()) := Arctan(ST, ST(1)) 
(Arctan_Re, Arctan_Im) := Arctan(z_re, z_im) 
= Arctan(z) with -2/2 < Arctan_Re < +x/2 


Discussion 


mqerCATN returns the principal value of the complex arc tangent for 
the complex number z with real and imaginary components (z_re, 
z_im). The real component of its result falls in the range -2/2..+7/2. 


mqerCATN accepts infinite arguments and returns (x/2 with z_re’s 
sign, 0 with z_im’s sign). 


The mathematical definition for Arctan(z) (or tan”! z) is the complex 
integral: 


dt 
Arctan(z) = oe 
1+t 
0 


The path of integration must not cross the imaginary axis, except 
possibly in the interval -1.0 < z_im < +1.0. 


Figure 3-15 shows the domain of Arctan(z) with the points A’ = 
(+0,+1), C’ = (+1,+0), B’ = (+0,-1), B = (-0,-1), C = (-1,40), and A = 
(-0,+1) on the branch cuts. Figure 3-16 shows the image of the 
domain under Arctan(z). 
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maerCATN (continued) 
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Figure 3-15 Domain of Arctan(z) with Branch Cuts 
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Figure 3-16 Range of Arctan(z) 
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mgerCATN (continued) 
Exceptions 


Possible exceptions are Invalid, Denormal, Overflow, and Underflow: 


returns the QNaN indefinite to affected components of the result. 
If I is unmasked, control passes to the exception handler with the 
input z_im still in ST(1), z_re still in ST, and the exception 
opcode set. ; 


Oo I Input SNaNs cause the I exception. If I is masked, mqerCATN 


D_ Input denormals cause the D exception. If D is masked, 
mgerCATN returns its result. If D is unmasked, control passes to 
the exception handler with z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 


O Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
mqerCATN returns +~ to affected components of the result. If O 
is unmasked, control passes to the exception handler with z_im 
still in ST(1), z_re still in ST, and the exception opcode set. 


U Component results that are too tiny to fit accurately in extended 

format cause the U exception if U is masked. In this case, 

Oo mgqerCATN returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im still in 
ST(1), z_re still in ST, and the exception opcode set. 


Exception Opcode 


3A3H 


*) 
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magerCATN (continued) 
Example 


maqerCATN returns Arctan(z_re, z_im) for the complex number z; 
the real component of its result falls in the range —1/2..+7/2. 


in DATA segment i) 


ZRE DT 1.0 ; initialized 
ZIM DT 3.0 ; to test values 
ARCTAN_RE DT ? 

ARCTAN_IM DT ? 


: : ; in CODE32 segment 
EXTRN MQERCATN: NEAR 


; The following lines compute Arctan(Z RE,Z_IM) and 
; store the real and imaginary components of the 
3 result in ARCTAN RE and ARCTAN_IM. 


FLD Z_IM s push, ST := Z_IM 
FLD Z_RE 3 push, ST := Z RE 
CALL MQERCATN 3 (ST,ST(1)) := 
$ Arctan(ST,ST(1)) #) 
FSTP ARCTAN RE ; Store real component, pop ST 
FSTP ARCTAN_IM 3 Store imaginary component, 
3 pop ST. 


3 ARCTAN_RE is about 1.4615. 
; ARCTAN_IM is about 0.3059. 


* 
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mgerCC2C 
Returns complex number 
raised to complex power 


oO Function 


(ST, ST(1)) := (ST(2), ST(3))ST* STE : 
(Re_Result, Im_Result) := (w_re, w_im)‘%"@ 71M _ w? 


Discussion 


maqerCC2C returns the complex result of raising a complex number w 
to a complex power z. maqerCC2C returns: 


e e 7!) if 7 im « +0, according to the calculations of 
mqerCMUL, mqerCLGE, and mqerCEXP 


e wT? if z_im = +0, according to the calculation of mqerCC2R 


Exceptions 


re) Possible exceptions are Invalid, Denormal, Zerodivide, Overflow, and 
Underflow: 


I Input SNaNs cause the I exception. If I is masked, mqerCC2C 
returns the QNaN indefinite to affected components of the result. 
If I is unmasked, control passes to the exception handler with the 
input w_im still in ST(3), w_re still in ST(2), z_im still in ST(1), 
z_re still in ST, and the exception opcode set. 


D Input denormals cause the D exception. If D is masked, 
mgerCC2C returns its result. If D is unmasked, control passes to 
the exception handler with w_im still in ST(3), w_re still in 
ST(2), z_im still in ST(1), z_re still in ST, and the exception 
opcode set. 


Z Input z_re < 0 with w_re, w_im, and z_im = +0 causes the Z 
exception. If Z is masked, mqerCC2C returns + to affected 
components of the result. If Z is unmasked, control passes to the 

O exception handler with w_im still in ST(3), w_re still in ST(2), 
z_im still in ST(1), z_re still in ST, and the exception opcode set. 
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mgqerCC2C (continued) 


O Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
mqaerCC2C returns +~ to affected components of the result. If O 
is unmasked, control passes to the exception handler with w_im 
still in ST(3), w_re still in ST(2), z_im still in ST(1), z_re still in oO 
ST, and the exception opcode set. 


U Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
maerCC2C returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with w_im still 
in ST(3), w_re still in ST(2), z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 


Exception Opcode 


58EH 


Oo 
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mgerCC2C (continued) 
Example 


mqerCC2C returns the complex result of raising one complex number 
to the power of another. 
we) : : in DATA segment 
WRE DT 1.0 


i 3 initialized 
WIM DT 0.5 3 to 

ZRE DT 1.0 3 test 

Z IM DT 1.0 3 values 


RE RESULT DT ? 
IM_RESULT DT ? 


we 


‘ 7 in CODE32 segment 
EXTRN MQERCC2C: NEAR 


3; The following lines compute 

; (W_RE, W_IM)**(Z_RE, Z_IM) and store the real 
3 and imaginary components of the result 

3 in RE_RESULT and IM RESULT. 


) FLD WIM 5 push, ST := WIM 

FLD W_RE s push, ST := WRE 

FLD Z_IM 3 push, ST := Z_IM 

FLD Z_RE s push, ST := Z RE 

CALL MQERCC2C 3 (ST,ST(1)) := (ST(2),ST(3)) 
3 **(ST, ST(1)) 

FSTP RE_RESULT ; Store real component, pop ST 

FSTP IM RESULT 3; Store imaginary component, 
3 pop ST. 


3% 


; RE_RESULT is about 0.5901. 
3 IM RESULT is about 0.3826. 
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mgerCC2R 
Returns complex number 
raised to real power 


Function 


(ST, ST(1)) := (ST(1), ST(2))™ 
(Re_Result, Im_Result) := (z_re, z_im)* = z* 


Discussion 


mqerCC2R returns the complex result of raising a complex number z 
to the power of a real number x. If x = +0, mqerCC2R returns 
(+1, x*(1 with-z_im’s sign)), whatever the value of z. 


For non-integer x or x = +~, mqerCC2R returns: 


Womtant 5 : . 
ee (x*In(] z |), x*principal_value_angle(z_re, z_im)) if z_im ~ +0 


e (z_reX,z_ im*(1 with x’s sign)) if z_re => 0 and z_im = +0 
< e(x* lnc] z |), (x mod 2)*principal_value_angle(z_re, z_im)) 
if z_re not = 0 and z_im = +0 
The function principal_value_angle returns the angle between the 


positive real axis and the line segment connecting the origin to the 
point z (see mqerCPOL). 


For nonzero, integer x, mqerCC2R returns: 


eo  eX*'(2) if | x | > 8 and z_im «0 . 


e (z_re*, x*z_im*((1 with z_re’s sign)*(1 with z_re”’s sign))) 
if | x|> 8 and z_im = +0 


e 2* if 1 <x <8 by successively squaring and multiplying z to 
compute the correct power 


e 2z* if -8 <x <-1 by evaluating one of two possible expressions: 


e l/ (2! ‘ ly provided that the denominator would not cause 
numeric overflow or underflow 


© (1/2)! * | otherwise 
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maerCC2R (continued) 


Exceptions 


Possible exceptions are Invalid, Denormal, Zerodivide, Overflow, and 
Underflow: 


ie) I 


Input SNaNs cause the I exception. If I is masked, mqerCC2R 
returns the QNaN indefinite to affected components of the result. 
If I is unmasked, control passes to the exception handler with the 
input z_im still in ST(2), z_re still in ST(1), x still in ST, and the 
exception opcode set. 


Input denormals cause the D exception. If D is masked, 
maerCC2R returns its result. If D is unmasked, control passes to 
the exception handler with z_im still in ST(2), z_re still in ST(1), 
x still in ST, and the exception opcode set. 


Input x < 0 with z_re and z_im = +0 causes the Z exception. If 

Z is masked, mqerCC2R returns +» to affected components of the 
result. If Z is unmasked, control passes to the exception handler 

with z_im still in ST(2), z_re still in ST(1), x still in ST, and the 
exception opcode set. 


Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
maerCC2R returns +o to affected components of the result. If O 
is unmasked, control passes to the exception handler with z_im 
still in ST(2), z_re still in ST(1), x still in ST, and the exception 
opcode set. 


Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
maqerCC2R returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im still in 
ST(2), z_re still in ST(1), x still in ST, and the exception opcode 
set. 


Oo Exception Opcode 
592H 
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maerCC2R (continued) 
Example 


mgerCC2R returns the complex result of raising a complex number to 


a real power. 
in DATA segment oO 


ZRE DT 1.0 ; initialized 
ZIM OT 0.5 ; to 
X DT 2.0 3; test values 


RE_RESULT DT ? 
IM_RESULT DT ? 


: : s in CODE32 segment 
EXTRN MQERCC2R: NEAR 


3 The following lines compute (Z_RE, Z_IM)**X and 
; store the real an imaginary components 
3 of the result in RE_RESULT and IM RESULT. 


FLD Z_IM push, ST := Z_IM 
FLD ZRE push, ST := ZRE 
FLD X push, ST := X we) 
CALL MQERCC2R (ST,ST(1)) := (ST(2),ST(1) 

#*ST 


FSTP RE_RESULT 


cs Store real component, pop ST 
FSTP IM RESULT 


Store imaginary component, 
pop ST. 


we we we we Oe we we we 


; RE_RESULT is about 0.75. 
3 IM_RESULT is about 1.0. 
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mgerCCl2 
Returns complex number 
raised to word integer power 


oO Function 


(ST, ST(1)) := (ST, sT(1))** 
(Re_Result, Im_Result) := (z_re, z __im)i for =32768 <j s +32767 


Discussion 


maerCClI2 returns the complex result of raising the complex number z 
to the power of a 16-bit integer j, expressed in two’s complement. 


If j = 0, mqerCCI2 returns (+1, 0), whatever the value of z. 
Otherwise, mqerCCI2 returns: 


© ef *N2) if | j | > 8 and z_im «0 
. (z_rej, j*z_im*((1 with z_re’s sign)*(1 with z_rels sign))) 
#) if |j|> 8 and z im = +0 
e wifi < j <8 by successively squaring and multiplying z to 
compute.the correct power 
e wif -8< j <-1 by evaluating one of two possible expressions: 


e I/ (z! j l) provided that the denominator would not cause 
numeric overflow or underflow 


e (G / 2)! i | otherwise 


Exceptions 


Possible exceptions are Invalid, Denormal, Zerodivide, Overflow, and 
Underflow: 


I. Input SNaNs cause the I exception. If I is masked, mqerCCI2 
returns the QNaN indefinite to affected components of the result. 


If I is unmasked, control passes to the exception handler with the 
input z_im in ST(2), z_re in ST(1), j in ST, and the exception 
opcode set. 
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mqgerCCl2 (continued) 


D Input denormals cause the D exception. If D is masked, 
mgerCCI2 returns its result. If D is unmasked, control passes to 
the exception handler with z_im in ST(2), z_re in ST(J), j in ST, 
and the exception opcode set. 


Z Input j < 0 with z_re and z_im = +0 causes the Z exception. If 
Z is masked, mqerCCI2 returns +~ to affected components of the 
result. If Z is unmasked, control passes to the exception handler 
with z_im in ST(2), z_re in ST(1), j in ST, and the exception 
opcode set. 


O Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
mqerCCl2 returns +o to affected components of the result. If O is 
unmasked, control passes to the exception handler with z_im in 
ST(2), z_re in ST(i), j in ST, and the exception opcode set. 


U Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
maerCClI2 returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In i) 
this case, control passes to the exception handler with z_im in 
ST(2), z_re in ST(1), j in ST, and the exception opcode set. 


Exception Opcode 
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mgerCCl2 (continued) 
Example 


mqgerCCI2 returns the complex result of raising a complex number on 
the 80387 stack to the power of an integer in the range -32768..32767. 


oO \The input exponent is in the AX register. 
: : ; in DATA segment 
ZRE DT 1.0 ; initialized 
ZIM DT 0.5 3 to 
J DW O2FFH 3; test values 


RE_RESULT OT ? 
IM RESULT OT ? 


$ ; in CODE32 segment 
EXTRN MQERCCI2: NEAR 


3 The following lines compute (Z_RE, Z_IM)**J and 
3 store the real and imaginary components 
; of the result in RE RESULT and IM RESULT. 


FLD Z_IM push, ST := Z_IM 
Oo FLD Z_RE push, ST := Z_RE 
MOV AX, J AX := J 


CALL MQERCCI2 
FSTP RE_RESULT 
FSTP IM_RESULT 


(ST,ST(1)) := (ST,ST(1))**AX 
Store real component, pop ST 
Store imaginary component, 
pop ST. 


ee we we we we we we 


; RE_RESULT is about -1.1919E37. 
s IM_RESULT is about -8.4687E36. 


*) 
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mgerCCl4 
Returns complex number 
raised to short integer power 


Function oO 


(ST, ST(1)) = (ST, ST(1))*™ : 
(Re_ Result, Im_Result) := (z_re, z_im)! for -251 <j < +(27' - 1) 


Discussion 


mqerCCI4 returns the complex result of raising the complex number z 
to the power of a 32-bit integer j, expressed in two’s complement. 


If j = 0, mqerCCI4 returns (+1, 0), whatever the value of z. 
Otherwise, mgqerCCl4 returns: 


e ef*!N(2) if | j | > 8 and z_im «0 


© (z_re, j*z_im*((1 with z_re’s sign)*(1 with z_re/’s sign))) 
if | j | > 8 and z_im = 40 


e wifi <j <8 by successively squaring and multiplying z to ae) 
compute the correct power 


e z if -8 <j <-1 by evaluating one of two possible expressions: 


e 1/ (z! j l) provided that the denominator would not cause 
numeric overflow or underflow 


e ( / 2)! i | otherwise 


Exceptions 


Possible exceptions are Invalid, Denormal, Zerodivide, Overflow, and 
Underflow: 


I Input SNaNs cause the I exception. If I is masked, mqerCCl4 
returns the QNaN indefinite to affected components of the result. 
If I is unmasked, control passes to the exception handler with the 
input z_im in ST(2), z_re in ST(1), j in ST, and the exception oO 
opcode set. 
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oO 


maerCCl4 (continued) 


Input denormals cause the D exception. If D is masked, 
mqaerCCI4 returns its result. If D is unmasked, control passes to 
the exception handler with z_im in ST(2), z_re in ST(1), j in ST, 
and the exception opcode set. 


Input j < 0 with z_re and z_im = +0 causes the Z exception. If 
Z is masked, mqerCCl4 returns + to affected components of the 
result. If Z is unmasked, control passes to the exception handler 
with z_im in ST(2), z_re in ST(1), j in ST, and the exception 
opcode set. 


Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
mqgerCCl4 returns +~ to affected components of the result. If O is 
unmasked, control passes to the exception handler with z_im in 
ST(2), z_re in ST(1), j in ST, and the exception opcode set. 


Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
mqgerCCl4 returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im in 
ST(2), z_re in ST(1), j in ST, and the exception opcode set. 


Exception Opcode 
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maerCCl4 (continued) 
Example 


mqaerCClI4 returns the complex result of raising a complex Fuimber on 
the 80387 stack to the power of an integer in the range =27! (27! 


1). The input exponent is in the EAX register. oO 
: : 3; in DATA segment 
ZRE DT 1.0 3 initialized 
ZIM DT 0.5 3 to 
J DD 00000210H 3; test values 


RE_RESULT DT ? 
IM_RESULT DT ? 


‘ : 3; in CODE32 segment 
EXTRN MQERCCI4: NEAR 


; The following lines compute (Z_RE, Z_IM)**J and 
; store the real and imaginary components 
3 of the result in RE_RESULT and IM_RESULT. 


FLD Z_IM push, ST := Z_IM 
FLO ZORE push, ST := ZRE oO 
MOV EAX, J EAX := J 


CALL MQERCCI4 (ST, sT(1)) 2 = (ST,ST(1)) 
*EAX 
FSTP RE_RESULT 


a Store real i ae pop ST 
FSTP IM_RESULT 


Store imaginary component, 
pop ST. 


we we we we we Oe we we 


3 RE_RESULT is about 3.7307E25. 
3 IM_RESULT is about -9.0621E24. 
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oO Function 


*) 


mgerCCls 
Returns complex number 
raised to long integer power 


(ST, ST(1)) := (ST, ST(1))°*-™ ; 
(Re_ Result, Im_Result) := (z_re, z_im)! for -2% < j < +(2 - 1) 


Discussion 


maerCCI8 returns the complex result of raising the complex number z 
to power of a 64-bit integer j, expressed in two’s complement 


If j = 0, mqerCCI8 returns (+1, 0), whatever the value of z. 
Otherwise, mgqerCCI8 returns: 


eJ*!n(2) if | 5] > 8 and z_im «0 


(z_rej, j*z_im*((1 with z_re’s sign)*(1 with z_re/’s sign))) 
if | j | > 8 and z_im = +0 


z if 1 <j < 8 by successively squaring and multiplying z to 
compute the correct power 


z if -8 < j <-1 by evaluating one of two possible expressions: 


e 1l/ (z! j l) provided that the denominator would not cause 
numeric overflow or underflow 


e (/ z)! i | otherwise 


Exceptions 
Possible exceptions are Invalid, Denormal, Zerodivide, Overflow, and 
Underflow: 
I Input SNaNs cause the I exception. If I is masked, mqerCCI8 


returns the QNaN indefinite to affected components of the result. 
If I is unmasked, control passes to the exception handler with the 
input z_im in ST(2), z_re in ST(1), j in ST, and the exception 
opcode set. 
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mqerCCl8 (continued) 


D Input denormals cause the D exception. If D is masked, 
mqaerCCI8 returns its result. If D is unmasked, control passes to 
the exception handler with z_im in ST(2), z_re in ST(1), j in ST, 
and the exception opcode set. 


Z Input j < 0 with z_re and z_im = +0 causes the Z exception. If Oo 
Z is masked, mqerCCI8 returns +o to affected components of the 
result. If Z is unmasked, control passes to the exception handler 
with z_im in ST(2), z_re in ST(1), j in ST, and the exception 
opcode set. 


O Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
mqaerCCI8 returns +# to affected components of the result. If O is 
unmasked, control passes to the exception handler with z_im in 
ST(2), z_re in ST(1), j in ST, and the exception opcode set. 


U Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
mgerCCI8 returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im in #) 
ST(2), z_re in ST(1), j in ST, and the exception opcode set 


Exception Opcode 
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maqerCCI8 (continued) 
Example 
maerCCI8 returns the complex result of raising a complex number on 
the 80387 stack to the power of an integer in the range -2_4(23 - 


oO 1). The input exponent is in the EDX (most significant digits) and 
EAX registers. 


in DATA segment 


Z_RE OT "1.0 3 initialized 
ZIM DT 0.5 ; to test 
J DQ 0000000000000122H ; values 


RE_RESULT DT ? 
IM RESULT DT ? 


: ‘ ; in CODE32 segment 
EXTRN MQERCCI8: NEAR 


3 The following lines compute (Z_RE, Z_IM)**EDX_EAX 
3 and store the real and imaginary components 
3 of the result in RE_RESULT and IM RESULT. 


i) FLD Z_IM 
FLD Z RE 
MOV EAX, J 


MOV EDX, J+4 
CALL MQERCCI8 


push, ST := Z_IM 

push, ST := Z RE 

EAX := lower_4 bytes(J) 

EDX := upper 4 bytes(J) 

(ST,ST(1)) := (ST,ST(1)) 
**EDX_EAX 

Store real component, pop ST 

Store imaginary component, 

pop ST. 


FSTP RE_RESULT 
FSTP IM_RESULT 


we we we we we we we we we 


3 RE_RESULT is about -9.1026E13. 
; IM_RESULT is about 6.6463E13. 


oO 
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mgerCClIS 


Returns complex number 
raised to short integer power 


Function O 


(ST, ST(1)) s= (ST, ST(1))StoP-*bytes_80386_steck) 
= (ST, ST(1))“ord Ptr SS:ESP) 
(Re_Result, Im_Result) := (z_re, z_im)/ for -23" < j < +(23" - 1) 


Discussion 


maerCCIS returns the complex result of raising the complex number z 
on the 80387 stack to the power of a 32-bit integer j, expressed in 
two’s complement and pushed on the 80386 stack. 


If j = 0, mqerCCIS returns (+1, 0), whatever the value of z. 
Otherwise, mqerCCIS returns: 
e e*!n(2) if | j | > 8 and z_im «0 


© (z_re/, j*z_im*((1 with z_re’s sign)*(1 with z_re!’s sign))) oO 
if | j|> 8 and z_im = +0 


e wif <j <8 by successively squaring and multiplying z to 
compute the correct power 


e wif -8< j <-1 by evaluating one of two possible expressions: 


e 1/ (z! j l) provided that the denominator would not cause 
numeric overflow or underflow 


e (1 / 2)! i | otherwise 


Exceptions 


Possible exceptions are Invalid, Denormal, Zerodivide, Overflow, and 
Underflow: 


I Input SNaNs cause the I exception. If I is masked, mqerCCIS 
returns the QNaN indefinite to affected components of the result. oO 
If I is unmasked, control passes to the exception handler with the 
input z_im in ST(2), z_re in ST(1), j in ST, and the exception 
opcode set. 
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Oo 
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mgerCCIS (continued) 


Input denormals cause the D exception. If D is masked, 
mqerCCIS returns its result. If D is unmasked, control passes to 
the exception handler with z_im in ST(2), z_re in ST(1), j in ST, 
and the exception opcode set. 


Input j < 0 with z_re and z_im = +0 causes the Z exception. If 
Z is masked, mqerCCIS returns +~ to affected components of the 
result. If Z is unmasked, control passes to the exception handler 
with z_im in ST(2), z_re in ST(1), j in ST, and the exception 
opcode set. 


Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
mqgerCCIS returns t~ to affected components of the result. If O is 
unmasked, control passes to the exception handler with z_im in 
ST(2), z_re in ST(1), j in ST, and the exception opcode set. 


Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
mqaerCCIS returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im in 
ST(2), z_re in ST(1), j in ST, and the exception opcode set. 


Exception Opcode 
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mgerCCIS (continued) 


Example 


mqaerCCIS returns the complex result of raising a complex Aumber on 
the 80387 stack to the power of an integer in the range -2 31 (231 


1). The input exponent is on the 80386 stack. 


3-140 


Z.RE DT 1.0 
ZIM DT 0.5 
J DD 000002FFH 
RE_RESULT DT ? 
IM_RESULT DT ? 


EXTRN MQERCCIS: NEAR 


3 The following lines compute (Z_RE, Z_IM)**J and 


in DATA segment 
initialized 

to 

test values 


in CODE32 segment 


; store the real and imaginary components 
3 of the result in RE RESULT and IM RESULT. 


FLD Z_IM 
FLD Z_RE 

PUSH J 

CALL MQERCCIS 


FSTP RE_RESULT 
FSTP IM_RESULT 


we we we we we we we we 


push. J onto 80386 stack 

= (ST,ST(1))** 
(DWORD PTR SS:ESP) 
Store real component, pop ST 
Store imaginary component, 


(ST,ST(1)) : 


pop ST. 


3 RE_RESULT is about -1.1919E37. 
3 IM_RESULT is about -8.4687£36. 


3 MQERCCIS pops J from the 80386 stack. 
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oO 


Oo 


mgerCCOS 


Returns complex cosine 


Oo Function 


Oo 


(ST, ST(1)) := cos(ST, ST(1)) 
(Cos_Re, Cos_Im) := cos(z_re, z_im) if -» < z_re < +» 


Discussion 


mgerCCOS returns the complex cosine of the complex number z with 
real and imaginary components (z_re, z_im). 


Cos(z) is defined mathematically in terms of the transcendental 
constant e (2.71828182845904523536..): 
ez + eiz 
cos(z) = 
2 


The real and imaginary components are defined in terms of real 
functions: 


cos(z) = cos(z_re, z_im) = (Cos_Re, Cos_Im) 
where 

Cos_ Re = cos(z_re) * cosh(z_im) 

Cos_Im = -sin(z_re) * sinh(z_im) 


Exceptions 


Possible exceptions are Invalid, Denormal, Overflow, and Underflow: 


I Input SNaNs and z_re = to cause the I exception. If I is masked, 
mqerCCOS returns the QNaN indefinite to affected components of 
the result. If I is unmasked, control passes to the exception 
handler with the input z_im still in ST(1), z_re still in ST, and 
the exception opcode set. 
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mgerCCOS (continued) 


D_ Input denormals cause the D exception. If D is masked, 
mqerCCOS returns its result. If D is unmasked, control passes to 
the exception handler with z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 


O Component results whose exponents are too large to fit in oO 
extended format cause the O exception. If O is masked, 
mqaerCCOS returns +~ to affected components of the result. If O 
is unmasked, control passes to the exception handler with z_im 
still in ST(1), z_re still in ST, and the exception opcode set. 


U Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
mqaerCCOS returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im still in 
ST(1), z_re still in ST, and the exception opcode set. 


Exception Opcode 


s9nH O 
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mgerCCOS (continued) 
Example 


mqaerCCOS returns cos(z_re, z_im) for the complex number z. 


oO : : ; in DATA segment 
ZRE DT 1.0 3; initialized 
ZIM DT 3.0 3; to test values 
COS RE DT ? 
COS_IM DT ? 


: : ; in CODE32 segment 
EXTRN MQERCCOS: NEAR 


3 The following lines compute cos(Z_RE, Z_IM) and 
; store the real and imaginary components 
3 of the result in COS RE and COS_IM. 


FLD Z_IM ; push, ST := Z_IM 
FLD Z_RE ; push, ST := Z RE 
CALL MQERCCOS 3 (ST,ST(1)) := cos(ST,ST(1)) 
FSTP COS _RE ; Store real component, pop ST 
a) FSTP COS_IM 3; Store imaginary component, 
3 pop ST. 


; COS_RE is about 5.4396. 
; COS_IM is about -8.4298. 
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mqerCCSH 


Returns complex hyperbolic cosine 


Function 


(ST, ST(1)) := cosh(ST, ST(1)) 
(Cosh_Re, Cosh_Im) := cosh(z_re, z_im) if - < z_im < +0 


Discussion 


mqaerCCSH returns the complex hyperbolic cosine of the complex 
number z with real and imaginary components (z_re, z_im). 


Cosh(z) is defined mathematically in terms of the transcendental 
constant e (2.71828182845904523536..): 


cosh(z) = 


The real and imaginary components are defined in terms of real 
functions: 


cosh(z) = cosh(z_re, z_im) = (Cosh_Re, Cosh_Im) 
where 

Cosh_Re = cosh(z_re) * cos(z_im) 

Cosh_Im = sinh(z_re) * sin(z_im) 


Exceptions 
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Possible exceptions are Invalid, Denormal, Overflow, and Underflow: 


I Input SNaNs and z_im = +~ cause the I exception. If I is 
masked, mqerCCSH returns the QNaN indefinite to affected 


components of the result. If I is unmasked, control passes to the 
exception handler with the input z_im still in ST(1), z_re still in 
ST, and the exception opcode set. 
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mgerCCSH (continued) 


D_ Input denormals cause the D exception. If D is masked, 


mqaerCCSH returns its result. If D is unmasked, control passes to 
the exception handler with z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 


Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
maerCCSH returns + to affected components of the result. If O 
is unmasked, control passes to the exception handler with z_im 
still in ST(1), z_re still in ST, and the exception opcode set. 


Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
mqaerCCSH returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im still in 
ST(1), z_re still in ST, and the exception opcode set. 


Exception Opcode 


39CH 
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maerCCSH (continued) 
Example 


mqerCCSH returns cosh(z_re, z_im) for the complex number z. 


: : s in DATA segment Oo 
ZRE DT 1.0 3; initialized 
ZIM DT 3.0 3; to test values 
COSH_RE DT ? 
COSH_IM DT ? 


: : ; in CODE32 segment 
EXTRN MQERCCSH: NEAR 


3 The following lines compute cosh(Z_RE, Z_IM) and 
3; store the real and imaginary components 
3 of the result in COSH_RE and COSH_IM. 


FLD Z_IM 
FLD Z_RE 
CALL MQERCCSH 
FSTP COSH_RE 
FSTP COSH_IM 


push, ST := Z_IM 

push, ST := Z_RE 

(ST,ST(1)) := cosh(ST,ST(1)) 

Store real component, pop ST 

Store imaginary component, re) 
pop ST. 


we we we we we we 


3 COSH_RE is about -1.5276. 
3 COSH_IM is about 0.1658. 


oO 
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magerCDIV 
Returns quotient 
of two complex numbers 


Oo Function 


(ST, ST(1)) = ((ST(2), ST(3)) / (ST, ST(1))) 
(Quo_Re, Quo_Im) := ((w_re, w_im) / (z_re, z_im)) = w/z 


Discussion 


mgqerCDIV returns the complex quotient of two complex numbers w 
and z with real and imaginary components (w_re, w_im) and (z_re, 
z_im). 


The mathematical definition of the complex quotient is as follows: 


w/z= (Quo_Re, Quo_Im) 
a) where 
(w_re *z_re) + (w_im*z im) 
Quo_Re = —_—_—__ 
zie + z in? 
(w_im * z_re) - (W_re * z_im) 
Quo_Im = —_ 
ze + z_ int 
For example, (-1, 0) / (0, 1) = (0, 1). Note that input z should not be 
(+0, +0). 


*) 
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mgerCDIV (continued) 


The input w and/or z can have one or more infinity components. 
mqerCDIV calculates results as follows: 


e If w’s components are finite and z has one or more infinite 
components, mqerCDIV replaces each component of w with 0 of 
the same sign. i) 


e If z’s components are finite and w has one or more infinite 
components, mqerCDIV leaves z’s components unchanged. 


e Next, it replaces an argument’s infinite component(s) with | of the 
same sign and any finite component of this argument with 0 of 
the same sign. 


e Then, it computes the quotient and replaces each nonzero 
component of the result with an infinity of the same sign. 


Exceptions 


Possible exceptions are Invalid, Denormal, Zerodivide, Overflow, and 
Underflow: 


I Input SNaNs and w = z = (+0, +0) cause the I exception. If I is 
masked, mqerCDIV returns the QNaN indefinite to affected 
components of the result. If I is unmasked, contro! passes to the 
exception handler with the input w_im still in ST(3), w_re still in 
ST(2), z_im still in ST(1), z_re still in ST, and the exception 
opcode set. 


D Input denormals cause the D exception. If D is masked, 
mgerCDIV returns its result. If D is unmasked, control passes to 
the exception handler with the input w_im still in ST(3), w_re 
still in ST(2), z_im still in ST(1), z_re still in ST, and the 
exception opcode set. 


Z Input w » (+0, +0) with z = (+0, +0) causes the Z exception. If Z 
is masked, mqerCDIV returns +~ to affected components of the 
result. If Z is unmasked, control passes to the exception handler 
with the input w_im still in ST(3), w_re still in ST(2), z_im still 
in ST(1), z_re still in ST, and the exception opcode set. 


O Component results whose exponents are too large to fit in oO 
extended format cause the O exception. If O is masked, 
mqerCDIV returns +~ to affected components of the result. If O 
is unmasked, control passes to the exception handler with the 
input w_im still in ST(3), w_re still in ST(2), z_im still in ST(1), 
z_re still in ST, and the exception opcode set. 
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mgerCDIV (continued) 


U Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
mgerCDIV returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 

a) Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with the input 
w_im still in ST(3), w_re still in ST(2), z_im still in ST(1), z_re 
still in ST, and the exception opcode set. 


Exception Opcode 


58DH 
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mgerCDIV (continued) 
Example 


mqerCDIV returns the quotient of two complex numbers. 


7 : in DATA segment 
WRE DT 1.0 


a 3; initialized 
WIM DT 2.0 £0 

ZRE DT -3.0 3; test 

ZIM DT 4.5 3; values 
QUO_RE DT ? 

QUO_IM DT ? 


: : 3; in CODE32 segment 
EXTRN MQERCDIV: NEAR 


3; The following lines compute 

3 (W_RE, W_IM) / (Z_RE, Z_IM) and 

; store the real and imaginary components 
3 of the result in QUO_RE and QUO_IM. 


FLD W_IM push, ST := W_IM 
FLD W_RE push, ST := W RE 
FLD Z_IM push, ST := Z_IM 
FLD Z_RE push, ST := Z RE 
CALL MQERCDIV (STs ST(1)) : := (ST(2),ST(3)) 


/ (ST,ST(2)) 
Store real result, pop ST 
Store imaginary result, 
pop ST. 


FSTP QUO_RE 
FSTP QUO_IM 


we we we we we we we we we 


3 QUO_RE is about 0.2051. 
s QUO_IM is about -0.3590. 
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maqerCEXP 
Returns exponential (e”) 
of complex number 


oO Function 


(ST, ST(1)) t= efSts STE) 
(Exp_Re, Exp_Im) := e("@ im _ 9 2 


Discussion 


maqerCEXP returns the complex value of the transcendental constant e 
(2.71828 182845904523536..) raised to the complex power z with real 
and imaginary components (z_re, z_im). 

maerCEXP accepts z_re = +~ and returns: 

e (40, 0 with z_im’s sign) for z_re = +0 


e (+0, 0 with z_im’s sign) for z_re = -« 


#) The exponential of a complex number is defined mathematically as 
follows: 
exp(z) = e 7-T© * (cos(z_im) + (i* sin(z_im))) 


(Exp_Re, Exp_Im) 


where 

Exp_Re = e7-T€ * cos(z_im) 

Exp_Im = e7-T* * sin(z_im) 
Exceptions 


Possible exceptions are Invalid, Denormal, Overflow, and Underflow: 


oO I Input SNaNs and z_im = +~ cause the I exception. If I is 
: masked, mqerCEXP returns the QNaN indefinite to affected 
components of the result. If I is unmasked, control passes to the 
exception handler with the input z_im still in ST(1), z_re still in 
ST, and the exception opcode set. 
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mqerCEXP (continued) 


D Input denormals cause the D exception. If D is masked, 
mqerCEXP returns its result. If D is unmasked, control passes to 
the exception handler with the input z_im still in ST(1), z_re still 
in ST, and the exception opcode set. 


O Component results whose exponents are too large to fit in oO 
extended format cause the O exception. If O is masked, 
maerCEXP returns +~ to affected components of the result. If O 
is unmasked, control passes to the exception handler with the 
input z_im still in ST(1), z_re still in ST, and the exception 
opcode set. 


U Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
mqerCEXP returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with the input 
z_im still in ST(1), z_re still in ST, and the exception opcode set. 


Exception Opcode aw) 
398H 
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Oo 


*) 


Example 


mqerCEXP (continued) 


mqerCEXP returns e raised to the power of the complex number z. 


ZRE DT 1.0 
ZIM DT 3.0 
EXP_RE DT ? 
EXP_IM DT ? 


EXTRN MQEREXP: NEAR 


in DATA segment 
initialized 
to test values 


; in CODE32 segment 


; The following lines compute the complex exponential 
3 (e**z) of the complex number (Z_RE, Z_IM) and 

3 store the real and imaginary components 

3 of the result in EXP_RE and EXP_IM. 


FLD Z_RE 

CALL MQEREXP 
FSTP EXP_RE 
FSTP EXP_IM 


; EXP_RE is about -2.6911. 
3 EXP_IM is about 0.3836. 


Common Elementary Function Library 


wee we we we we we 


push, ST := Z_IM 
push, ST := Z_RE 

(ST,ST(1)) := e**(ST,ST(1)) 
Store real result, pop ST 
store imaginary result, 


pop ST. 
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mqerCLGE 
Returns natural logarithm 
of complex number 


Function oO 


(ST, ST(1)) := Ln(ST, ST(1)) 
(Ln_Re, Ln_Im) := Ln(z_re, z_im) with -x < Ln_Im <+2 


Discussion 


CLGE returns the principal value of the complex natural logarithm 
(base e) for the complex number z with real and imaginary 
components (z_re, z_im). 


The imaginary component of its result falls in the range -7..+7. 
However, Ln_Im = -z only under the following conditions: 
e z_re<-0 and 


¢ z_im=-0 
The mathematical definition for Ln(z) is the complex integral: oO 


Zz 
dt 
Ln(z) = — 
t 
1 


The path of integration does not pass through the origin nor cross the 
negative real axis. 


Figure 3-17 shows the domain of Ln(z) with points A = (-1,+0), D = 
(+1,4+0), D’ = (41,-0), A’ = (-1,-0), and B = (x,+0), C = (x,+0), C’ = 
(x,-0), B’ = (x,-0). Figure 3-18 shows the image of the domain 
under Ln(z). 


Oo 
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magerCLGE (continued) 
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Figure 3-17 Domain of Ln(z) with Branch Cut 


oO Imaginary 
Axis 


aL One, 
[A B PCDO019 


* 


Figure 3-18 Range of Ln(z) 
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maqerCLGE (continued) 
Exceptions 


Possible exceptions are Invalid, Denormal, and Zerodivide: 


I Input SNaNs cause the I exception. If I is masked, mqerCLGE 
returns the QNaN indefinite to affected components of the result. oO 
If I is unmasked, control passes to the exception handler with the 
input z_im still in ST(1), z_re still in ST, and the exception 
opcode set. 


D Input denormals cause the D exception. If D is masked, 
maerCLGE returns its result. If D is unmasked, control passes to 
the exception handler with z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 

Z Input z = (+0, +0) causes the Z exception. If Z is masked, 
maerCLGE returns — to the real component of the result. If Z is 
unmasked, control passes to the exception handler with the input 
z_im still in ST(1), z_re still in ST, and the exception opcode set. 


Exception Opcode 


397H oO 


*) 
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#) 


Example 


maerCLGE (continued) 


maerCLGE returns the principal value of Ln(z) for the complex 


number z. 


ZRE DT 1.0 
ZIM DT 3.0 
LN.RE DT ? 
LNIM DT ? 


EXTRN MQERCLGE: NEAR 


in DATA segment 
initialized 
to test values 


in CODE32 segment 


The following lines compute the complex logarithm 


store the real and imaginary components 


; (base e) of the complex number (Z_RE, Z_IM) and 


3 of the result in LN_RE and LN IM. 


FLD Z_IM 
FLD ZRE 

CALL MQERCLGE 
FSTP LN RE 
FSTP LN_IM 


3 LN_RE is about 1.1513. 
; LN_IM is about 1.2490. 
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. 
> 
. 
> 
. 
> 
. 
> 
> 
> 


push, ST := Z_IM 
push, ST := Z_RE 
(ST,ST(1)) := Ln(ST,ST(1)) 
Store real result, pop ST 


; Store imaginary result, 


pop ST. 
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mgqerCMUL 
Returns product 
of two complex numbers 


Function oO 


(ST, ST(1)) = (ST(2), ST(3)) * (ST, ST(1)) 
(Prod_Re, Prod_Im) := (w_re, w_im) * (z_re, z_im) = w * z 


Discussion 
mqerCMUL returns the complex product of two complex numbers w 
and z with real and imaginary components (w_re, w_im) and (z_re, 


z_im). 


The mathematical definition of the complex product is as follows: 


w*ze (Prod_Re, Prod_Im) 

where re) 
Prod_Re = (w_re * z_re) - (w_im * z_im) 

Prod_Im = (w_re * z_ im) + (w_im*z re) 


For example, (0, 1) * (0, 1) = (-1, 0). 
The input w and/or z can have one or more infinity components. 
mgqerCMUL calculates results as follows: 


e If both components of an argument are finite, mqerCMUL leaves 
them unchanged. 


e It replaces an argument’s infinite components with | of the same 
sign and any finite component of this argument with 0 of the 
same sign. 


e Then, it computes the product and replaces each nonzero oO 
component of the result with an infinity of the same sign. 
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oO 


mgerCMUL (continued) 


Exceptions 


Possible exceptions are Invalid, Denormal, Overflow, and Underflow: 


I 


Input SNaNs cause the J exception. If I is masked, mqerCMUL 
returns the QNaN indefinite to affected components of the result. 
If I is unmasked, control passes to the exception handler with the 
input w_im still in ST(3), w_re still in ST(2), z_im still in ST(1), 
z_re still in ST, and the exception opcode set. 


Input denormals cause the D exception. If D is masked, 
mqerCMUL returns its result. If D is unmasked, control passes to 
the exception handler with w_im still in ST(3), w_re still in 
ST(2), z_im still in ST(1), z_re still in ST, and the exception 
opcode set. 


Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
mgerCMUL returns + to affected components of the result. If O 
is unmasked, control passes to the exception handler with w_im 
still in ST(3), w_re still in ST(2), z_im still in ST(1), z_re still in 
ST, and the exception opcode set. 


Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
mqerCMUL returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with w_im still 
in ST(3), w_re still in ST(2), z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 


Exception Opcode 


58CH 
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maqerCMUL (continued) 
Example 


mqerCMUL returns the product of two complex numbers w and z. 


: : ; in DATA segment Oo 
WRE OT 1.0 3 initialized 
WIM DT 2.0 ; to. 
ZRE OT -3.0 ; test 
ZIM DT 4.5 3 values 
PROD.RE DT ? 
PROD_IM DT ? 


i $ s in CODE32 segment 
EXTRN MQERCMUL: NEAR 


The following lines compute 

(W_RE, WIM) * (Z_RE, Z_IM) and 

store the real and imaginary components 
of the result in PROD_RE and PROD_IM. 


we we we we 


FLD W_IM s push, ST := WIM 
FLD W_RE 3 push, ST := WRE #) 
FLD ZIM 3 push, ST := Z_IM 
FLD Z_RE 3 push, ST := Z_RE 
CALL MQERCMUL 3 (ST,ST(1)) := (ST(2),ST(3)) 
: * (ST,ST(1)) 
FSTP PROD_RE ; Store real component, pop ST 
FSTP PROD_IM ; Store imaginary component, 
; pop ST. 
; PROD_RE = 12.0 
3 PROD_IM = -1.5 
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mgerCPOL 
Returns complex number in polar representation 
for complex number in rectangular representation 


iw) Function 


(ST, ST(1)) := | ST, ST(1) |), principal_value_angle(ST, ST(1)) 
(Op_Rad, Op_Arg) := (magnitude(z_re, z_im), 
principal_value_angle(z_re, z_im)) 


Discussion 


mqerCPOL converts a complex number expressed in rectangular form 
into the same number expressed in polar form. 


mqerCPOL accepts z_re = +0 and z_im = +0 returns: 
e (40, 0 with z_im’s sign) if z_re = +0 and z_im = +0 


e (40, x with z_im’s sign) if z_re = -0 and z_im = +0 


#) maerCPOL also accepts infinite arguments and returns: 
e (+0, 0 with z_im’s sign) if z_re = +o and|{[ z_im |< +o 
e (+2, x/4 with z_im’s sign) if z_re = +~ and z_im = +o 
e (+0, « with z_im’s sign) if z_re = -~ and|z_im| < to 


© (+0, 3*x/4 with z_im’s sign) if z_re = -© and z_im = +~ 


The polar representation of z is defined by the following formulas: 


Op_Rad = | 
zie + z in? 


Op_Arg = Arctan(z_im / 2_re) 
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mgerCPOL (continued) 


maqerCPOL returns a pair of real numbers (Op_ Rad, Op_Arg) as its 

result. Op Rad is the magnitude of the radius: the line segment 

from the origin to the point (z_re, z_im) in the complex plane, as 

shown in Figure 3-19. Op_Arg is the principal value of the angle 

between the positive real axis and the radius. Op_Arg is always an Oo 
angle in radians that falls in the range -7..+7. 


is 
Polar “2 | Rectangular Imaginary Axis 


rectangular(z_re,z_Im) 
polar(op_rad) 


=| 2 


polar(op_arg) 


Rectangular Real Axis i) 


Polar 70 Polar 0 


PcDo020 


Figure 3-19 Rectangular and Polar Forms of a Complex Number 


Exceptions 


Possible exceptions are Invalid, Denormal, Overflow, and Underflow: 


I Input SNaNs cause the I exception. If I is masked, mqerCPOL 
returns the QNaN indefinite to affected components of the result. 
If I is unmasked, control passes to the exception handler with the 
input z_im still in ST(1), z_re still in ST, and the exception 
opcode set. oO 


D Input denormals cause the D exception. If D is masked, 
maerCPOL returns its result. If D is unmasked, control passes to 
the exception handler with z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 
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oO 


mqgerCPOL (continued) 


O An Op_Rad whose exponent is too large to fit in extended format 


cause the O exception. If O is masked, mqerCPOL returns += to 
Op_Rad. If O is unmasked, control passes to the exception 
handler with z_im still in ST(1), z_re still in ST, and the 
exception opcode set. 


Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
maerCPOL returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im still in 
ST(1), z_re still in ST, and the exception opcode set. 


Exception Opcode 


3A8H 
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maerCPOL (continued) 
Example 


maerCPOL converts the rectangular form of a complex number with 
components (z_re, z_im) into its polar form with components 


(op_rad, op_arg). oO 


: : ; in DATA segment 
Z RE DT 1.0 ; initialized 
ZIM DT 3.0 ; to test values 
OP_RAD DT ? 
OP_ARG DT ? 


: : 3; in CODE32 segment 
EXTRN MQERCPOL: NEAR 


3 The following lines convert (Z_RE, Z_IM) 
; from rectangular to polar form and 
; store the result in OP_RAD and OP_ARG. 


FLD Z_IM 5 push, ST := Z_IM 
FLD Z_RE ; push, ST := Z_RE 
CALL MQERCPOL ; (ST,ST(1)) z= ({ST,ST(1) |), a) 


3 principal_value(ST, ST(1)) 
FSTP OP_RAD ; Store radius, pop ST. 
FSTP OP_ARG ; Store angle, pop ST. 


; OP_RAD is about 3.1623. 
3 OP_ARG is about 1.2490. 


oO 
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maqerCPRJ 
Returns (infinity, zero with sign of imaginary component) 
for complex number with at least one infinite component 


oO Function 


(ST, ST(1)) = (©, 0 with sign(ST(1)) if (ST or ST(1) = ~) 
(Z_Re, Z_Im) := (», 0 with sign(z_im)) if (z_re or z_im) = @ 
Otherwise, (Z_Re, Z_Im) := (z_re, z_im) unchanged 


Discussion 


maerCPRJ returns the complex value (~, 0 with z_im’s sign) if at 
least one of z’s components is infinite. If neither component is 
infinite, mqerCPRJ returns z unchanged. 


maqerCPRJ forms the projective closure of the complex plane by 
mapping the square at infinity to the single point (, +0). The square 
at infinity consists of all points whose representation in rectangular 
coordinates has at least one infinite component. 


© Use mqerCPRJ whenever complex infinities might distort the value 
expected from a certain expression. In other words, use mqerCPRJ 
when an expression cannot produce the expected result unless the 
single point at infinity, as on the Riemann sphere, is the only infinity 
allowed to occur. 


Replace the logical expression z = (~, 0) with mqerCPRJ(z) = (~, 0) 
whenever you want to detect a complex infinity. Similarly, replace 
arithmetic expressions of the form (w + z) with expressions of the 
form (mqerCPRJ(w) - mqerCPRJ(#z)) only if both w and z might be 
infinite points other than (, +0). Consider using mqerCPRJ only for 
algebraic functions, like subtraction, that are discontinuous on the 
Riemann sphere. 


Exceptions 


See Section 3.1.2.1 


Common Elementary Function Library 3-165 


mqerCPRJ (continued) 
Exception Opcode 


3A7H 


Example oO 


mgerCPRJ returns the complex value (, 0 with the sign of the input 
imaginary component) if at least one of the input components is an 


infinity. 
3; in DATA segment 
Z RE. DT * FFF F8000000000000000R 3; -infinity 
Z_IM DT FFFFCO00000000000000R 3; QNaN indefinite 
CPRJ_LRE OT ? 
CPRJ_IM DT ? 


: ¢ 3; in CODE32 segment 
EXTRN MQERCPRJ: NEAR 


3 The following lines compute the complex projection 

; to infinity of the pair (Z_RE, Z_IM) and 

3; store the real and imaginary components oO 
; of the result in CPRJ_RE and CPRJ_IM. 


FLD Z_IM push, ST := Z_IM 
FLD Z RE push, ST := Z RE 
CALL MQERCPRJ (ST, ST(1)) : = (infinity, 0 


with Z_IM's sign) 
Store infinite or z_re 
component, pop ST. 
Store signed zero or z_im 
component, pop ST. 


FSTP CPRJ_RE 


FSTP CPRJ_IM 


we ee we we we we we we 


3 CPRI_RE 
; CPRJ_IM 


7FFF8000000000000000R = +infinity 
-0 
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mgerCR2C 
Returns complex result 
of real raised to complex power 


oO Function 


Oo 


(ST, ST(1)) := ST(2)°S": ST(1)) : 
(Re_ Result, Im_Result) := x°%"@ 71™ = x # 


Discussion 


maerCR2C returns the complex result of a real number x raised to the 
power of the complex number z with real and imaginary components 
(z_re, z_im). 


mgerCR2C returns: 
ez*int(x, 0)) 


° if z_im ~ +0 


e (x2"@ 0 with z_re’s sign) if x = 0, z_re is not a finite integer, 
and z_im = +0 

efter ln¢| x|), (z_re mod 2)*principal_value_angle(x,0)) 

if x not = 0, z_re is not a finite integer, and z_im = +0 

The function principal_value_angle returns the angle from the 
positive real axis to the line segment connecting the origin to the 
point (x, 0); this angle is 0 or a (see mqerCPOL). 

For z = (z_re, +0) when z_re is a finite integer, mgerCR2C returns: 
e (41, z_re) if z_re = +0 

© (x2-"€ 7 re*(0 with x’s sign)*(1 with x7-'s sign)) if | z_re| > 8 


e (x, 0)%-"° if 1 <z_re <8 by successively squaring and multiplying 
(x, 0) to compute the correct power 


e (x, 0)7-"¢ if -8 < z_re < -1 by evaluating one of two possible 
expressions: 


© 1/(x, oy! 2re ! provided that the denominator would not 
cause numeric overflow or underflow 


© (1 / (x, 0))! +f | otherwise 
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maqerCR2C (continued) 


Exceptions 
Possible exceptions are Invalid, Denormal, Zerodivide, Overflow, and 
Underflow: 
I Input SNaNs cause the I exception. If I is masked, mqerCR2C oO 


returns the QNaN indefinite to affected components of the result. 
If I is unmasked, control passes to the exception handler with 0 in 
ST(3), the input x still in ST(2), z_im still in ST(1), z_re still in 
ST, and the exception opcode set. 


D Input denormals cause the D exception. If D is masked, 
mqerCR2C returns its result. If D is unmasked, control passes to 
the exception handler with 0 in ST(3), x still in ST(2), z_im still 
in ST(1), z_re still in ST, and the exception opcode set. 


Z Input z_re <0 with x and z_im = +0 causes the Z exception. If 
Z is masked, mqerCR2C returns t~ to affected components of the 
result. If Z is unmasked, control passes to the exception handler 
with 0 in ST(3), x still in ST(2), z_im still in ST(1), z_re still in 
ST, and the exception opcode set. 


extended format cause the O exception. If O is masked, 
mqerCR2C returns +~ to affected components of the result. If O 
is unmasked, control passes to the exception handler with 0 in 
ST(3), x still in ST(2), z_im still in ST(1), z_re still in ST, and 
the exception opcode set. 


O Component results whose exponents are too large to fit in O 


U Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
mqerCR2C returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with 0 in ST(3), 
x still in ST(2), z_im still in ST(1), z_re still in ST, and the 
exception opcode set. 


Exception Opcode Oo 
591H 
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maerCR2C (continued) 
Example 


maerCR2C returns the complex result of raising a real number to the 
power of a complex number. 


*) 


in DATA segment 


X DT 2.0 ; initialized 
ZRE DT 2.0 ; to test 
ZIM DT 0.5 3 values 


RE_RESULT DT ? 
IM_RESULT DT ? 


: : s in CODE32 segment 
EXTRN MQERCR2C: NEAR 


; The following lines compute X**(Z_RE,Z_IM) and 
; return the real and imaginary components of 
3 the result to RE_RESULT and IM RESULT. 


FSTP RE RESULT 
FSTP IM RESULT 


Store real component, pop ST 
Store imaginary component, 
pop ST. 


FLD X s push, ST := X 
FLD Z_IM 3 push, ST := Z_IM 
a) FLD Z RE 5 push, ST := ZORE 
CALL MQERCR2C 3 (ST,ST(1)) := 
3 ST(2)**(ST,ST(1)) 


; RE_RESULT is about 3.7622. 
; IM_RESULT is about 1.3587. 


Oo 


Common Elementary Function Library 3-169 


mgerCREC 
Returns complex number in rectangular representation 
for complex number in polar representation 


Function QO 


(ST, ST(1)) := (ST * cos(ST(1)), ST * sin(ST(1))) 
(Z_Re, Z_Im) := (op_rad * cos(op_arg), op_rad * sin(op_arg)) 
if op_rad = +0 and op_arg is an angle expressed in radians 


Discussion 


mqerCREC converts a complex number expressed in polar form into 

the same complex number expressed in rectangular form. 

maerCREC accepts or_rad = +~ and returns: 

e (+, 0 with op_arg’s sign) if -x/4 < op_arg < 2/4 

e (+, 2/4 with op_arg’s sign) if op_arg = tx/4 

e (+0, © with op_arg’s sign) if 7/4 <| op_arg | < 3*x/4 

e (+0, 3*x/4 with op_arg’s sign) if op_arg = +3*2/4 #) 
e (-~, 0 with op_arg’s sign) if 3*x/4 <| op_arg|< x 


The rectangular representation of z is defined by the following 


formulas: 
Z Re= (op_rad * cos(op_arg)) 
Z_Im = (op_rad * sin(op_arg)) 


The polar representation of the complex number is of the form 

(op_rad, op_arg), as shown in Figure 3-20. Op__rad is the 

magnitude of the radius, the line segment from the origin to z; it 

should not be less than zero. Op_arg is the angle between the 

positive real axis and the radius; op_arg is expressed in radians. Oo 
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maerCREC (continued) 


Polar 


v [3 


Rectangular !maginary Axis 


rectangular(z_re,z_Im) 
polar(op_rad) 


=| z| 


polar(op_arg) 


Rectangular Real Axis 


Polar 70 Polar 0 


PCD0020 


Figure 3-20 Rectangular and Polar Forms of a Complex Number 


oO 


Exceptions 


Possible exceptions are Invalid, Denormal, and Underflow: 


I Input SNaNs, op_rad < +0, and op_arg = +~ cause the I 
exception. If I is masked, mqerCREC returns the QNaN 
indefinite to affected components of the result. If I is unmasked, 
control passes to the exception handler with the input op_arg still 
in ST(1), op_rad still in ST, and the exception opcode set. 


D_ Input denormals cause the D exception. If D is masked, 
maerCREC returns its result. If D is unmasked, control passes to 
the exception handler with op_arg still in ST(1), op_rad still in 
ST, and the exception opcode set. 


Oo 
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maerCREC (continued) 


U Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
maerCREC returns a gradual underflow denormal! to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as oO 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with op_arg still 
in ST(1), op_rad still in ST, and the exception opcode set. 


Exception Opcode 


3A9H 


Example 


maqerCREC converts the polar form of a complex number with 
components (op_rad, op_arg) into its rectangular form with 
components (Z_Re, Z_Im). 


: 3 s in DATA segment 
OP_RAD DT 1.0 ; initialized Ce) 
OP_ARG DT 3.0 ; to test values 
ZRE DT ? 
z_IM DT ? 


: 3 in CODE32 segment 
EXTRN MQERCREC: NEAR 


3; The following lines convert a complex number 
3 in polar form (OP_RAD, OP ARG) 
; to the number in rectangular form (Z_RE, Z_IM). 


FLD OP_ARG 
FLD OP_RAD 
CALL MQERCREC 


push, ST := OP_ARG 

push, ST := OP_RAD 

(ST, ST(1)) := (ST * 
cos(ST(1)), ST * sin(ST(1))) 


we we we we we we we 


FSTP Z_RE Store real component, pop ST 
FSTP Z_IM Store imaginary component, 
pop ST. OQ 


; Z_RE is about -0.98999. 
3 Z_IM is about 0.14112. 
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mgerCSIN 


Returns complex sine 


Oo Function 


(ST, ST(1)) := sin(ST, ST(1)) 
(Sin_Re, Sin_Im) := sin(z_re, z_im) if -© < z_re < +0 


Discussion 


mqaerCSIN returns the complex sine of the complex number z with 
real and imaginary components (z_re, z_im). 


Sin(z) is defined mathematically in terms of the transcendental 
constant e (2.71828182845904523536..): 


-e 
sin(z) = 
2i 
oO The real and imaginary components are defined in terms of real 
functions: 
sin(z) = sin(z_re, z_im) = (Sin_Re, Sin_Im) 
where 
Sin_Re = sin(z_re) * cosh(z_im) 
Sin_Im = cos(z_re) * sinh(z_im) 
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mqgerCSIN (continued) 
Exceptions 


Possible exceptions are Invalid, Denormal, Overflow, and Underflow: 


I 


Input SNaNs and z_re = + cause the I exception. If I is masked, 
maerCSIN returns the QNaN indefinite to affected components of 
the result. If I is unmasked, control passes to the exception 
handler with the input z_im still in ST(1), z_re still in ST, and 
the exception opcode set. 


Input denormals cause the D exception. If D is masked, 
mgerCSIN returns its result. If D is unmasked, control passes to 
the exception handler with z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 


Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
maerCSIN returns +o to affected components of the result. If O 
is unmasked, control passes to the exception handler with z_im 
still in ST(1), z_re still in ST, and the exception opcode set. 


Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
mqaerCSIN returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im still in 
ST(1), z_re still in ST, and the exception opcode set. 


Exception Opcode 
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mqaerCSIN (continued) 


mgaerCSIN returns sin(z_re, z_im) for the complex number z.. 


: ; in DATA segment 
ZRE DT 1.0 3; initialized 
ZIM DT 3.0 ; to test values 
SIN RE DT ? 

SIN_IM DT ? 


: : ; in CODE32 segment 
EXTRN MQERCSIN: NEAR 


; The following lines compute sin(Z_RE, Z_IM) and 
3; store the real and imaginary components 
3 of the result in SIN RE and SIN IM. 


FLD Z_IM 3 push, ST := Z_IM 
FLD Z_RE ; push, ST := Z RE 
CALL MQERCSIN ; (ST,ST(1)) := sin(ST,ST(1)) 
FSTP SIN_RE ; Store real component, pop ST 
FSTP SIN IM ; Store imaginary component, 

; pop ST. 


3 SIN_RE is about 8.4716. 
; SIN_IM is about 5.4127. 
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mqerCSNH 


Returns complex hyperbolic sine 


Function 


(ST, ST(1)) := sinh(ST, ST(1)) 
(Sinh_Re, Sinh_Im) := sinh (z_re, z_im) if -» < z_im < +0 


Discussion 


maerCSNH returns the complex hyperbolic sine of the complex 
number z with real and imaginary components (z_re, z_im). 


Sinh(z) is defined mathematically in terms of the transcendental 
constant e (2.71828182845904523536..): 


sinh(z) = 


The real and imaginary components are defined in terms of real 
functions: 


sinh(z) = sinh(z_re, z_im) = (Sinh_Re, Sinh_Im) 
where 

Sinh_Re = sinh(z_re) * cos(z_im) 

Sinh_Im = cosh(z_re) * sin(z_im) 
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maerCSNH (continued) 
Exceptions 


Possible exceptions are Invalid, Denormal, Overflow, and Underflow: 


I Input SNaNs and z_im = += cause the I exception. If I is 
masked, mqerCSNH returns the QNaN indefinite to affected 
components of the result. If I is unmasked, control passes to the 
exception handler with the input z_im still in ST(1), z_re still in 
ST, and the exception opcode set. 


D Input denormals cause the D exception. If D is masked, 
maerCSNH returns its result. If D is unmasked, control passes to 
the exception handler with z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 


O Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
mgerCSNH returns + to affected components of the result. If O 
is unmasked, control passes to the exception handler with z_im 
still in ST(1), z_re still in ST, and the exception opcode set. 


U Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
mqaerCSNH returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im still in 
ST(1), z_re still in ST, and the exception opcode set. 


Exception Opcode 
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maqerCSNH (continued) 
Example . 


3-178 


maerCSH returns sinh(z_re, z_im) for the complex number z. 


ZRE DT 1.0 
Z_IM DT 3.0 
SINH_RE DT ? 
SINH_IM DT 2? 


EXTRN MQERCSNH: NEAR 


> 


in DATA segment 
initialized 


; to test values 


; in CODE32 segment 


; The following lines compute sinh(Z_RE, z_IM) and 
; store the real and imaginary components 
3 of the result in SINH_RE and SINH_IM. 


FLD Z_IM 

FLD Z_RE 

CALL MQERCSNH 
FSTP SINH RE 
FSTP SINH IM 


wo we 


; SINH RE is about -1.1634. 


; SINH_IM is about 0.2178. 


push, ST := Z_IM 

push, ST := Z_RE 

(ST,ST(1)) := sinh(ST,ST(1)) 
Store real component, pop ST 
Store imaginary component, 
pop ST. 
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mgqerCSQR 
Returns complex square root 
of complex number 


Oo Function 


* 


(ST, ST(1)) := square_root(ST, ST(1)) 
(Sart_Re, Sqrt_Im) := square_root(z_re, z_im) 


Discussion 


mqaerCSQR returns the principal complex square root of the complex 
number z with real and imaginary components (z_re, z_im). 


mqaerCSQR accepts certain negative and zero input components and 
returns: 

e (40, Sqrt_Im > 0) if z_re < 0 and z_im = +0 

e (40, Sqrt_Im < 0) if z_re < 0 and z_im = -0 


e (+0, 0 with z_im’s sign) if z_re = +0 and z_im = +0 


mgqerCSQR also accepts component infinities and returns: 
e (+0, z_im) if z_re = +© and z_im = +o 
¢ (+, z_im) if z_re ~ +~ and z_im = +o 
¢ (4+, 0 with z_im’s sign) if z_re = + and z_im * to 


e (+0, © with z_im’s sign) if z_re = -~ and z_im * +o 


Exceptions 


Possible exceptions are Invalid and Denormal: 


I Input SNaNs cause the I exception. If I is masked, mqerCSQR 
returns the QNaN indefinite to affected components of the result. 
If I is unmasked, control passes to the exception handler with the 
input z_im still in ST(1), z_re still in ST, and the exception 
opcode set. 
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maerCSQR (continued) 


D Input denormals cause the D exception. If D is masked, 
mqgerCSQR returns its result. If D is unmasked, control passes to 
the exception handler with z_im still in ST(1), z_re still in ST, 


and the exception opcode set. 


Exception Opcode 
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Example 


3-180 


mqaerCSQR returns the principal complex square root of the complex 


number z. 


ZRE DT 1.0 
ZIM DT 3.0 
SQRT_RE DT ? 
SQRT_IM DT ? 


EXTRN MQERCSQR: NEAR 


FLD Z_IM 
FLD ZRE 
CALL MQERCSQR 


FSTP SQRT_RE 
FSTP SQRT_IM 


3 SQRT_RE is about 1.4426. 
3 SQRT_IM is about 1.0398. 


> 


> 


we we we we we we ve 


; in DATA segment 
; initialized 


to test values 


in CODE32 segment 


The following lines compute the complex square root 
of the complex number (Z_RE, Z_IM) and 

store the real and imaginary components 

of the result in SQRT_RE and SQRT_IM. 


push, ST := Z_IM 

push, ST := Z_RE 

(ST,ST(1)) := square_root( 
ST,ST(1)) 

Store real component, pop ST 

Store imaginary component,. 

pop ST. 
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maqerCTAN 


Returns complex tangent 


O Function 


(ST, ST(1)) := tan(ST, ST(1)) 
(Tan_Re, Tan_Im) := tan(z_re, z_im) if -~ < z_re < +0 


Discussion 


mqerCTAN returns the complex tangent of the complex number z 
with real and imaginary components (z_re, z_im). 


Tan(z) is defined mathematically in terms of sin(z) and cos(z): 


sin(z) 
tan(z) = 
cos(z) 
The real and imaginary components are defined in terms of real 
functions: 
tan(z) = tan(z_re, z_im) = (Tan_Re, Tan_!m) 
where 
tan(z_re) 
Tan_Re = ——_—___--- 
cost? (z_im) + (tar? (z_re) * sintf (z_im)) 
(1 + tar? (z_re)) * (sinh(z_im) * cosh(z_im)) 
Tan_Im = a a 


cost? (z_im) + (tar? (z_re) * sintt (z_im)) 
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maqerCTAN (continued) 
Exceptions 


Possible exceptions are Invalid, Denormal, Overflow, and Underflow: 


I 


Input SNaNs and z_re = +~ cause the I exception. If I is masked, 
mqaerCTAN returns the QNaN indefinite to affected components 
of the result. If I is unmasked, control passes to the exception 
handler with the input z_im still in ST(1), z_re still in ST, and 
the exception opcode set. 


Input denormals cause the D exception. If D is masked, 
maerCTAN returns its resuit. If D is unmasked, control passes to 
the exception handler with z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 


Component results whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
maerCTAN returns +~ to affected components of the result. If O 
is unmasked, control passes to the exception handler with z_im 
still in ST(1), z_re still in ST, and the exception opcode set. 


Component results that are too tiny to fit accurately in extended 
format cause the U exception if U is masked. In this case, 
maerCTAN returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im still in 
ST(1), z_re still in ST, and the exception opcode set. 


Exception Opcode 


3-182 


39DH 


Common Elementary Function Library 


Oo 


.* 


maerCTAN (continued) 


maerCTAN returns tan(z_re, z_im) for the complex number z. 


: : ; in DATA segment 
Z RE DT 1.0 3; initialized 
ZIM DT 3.0 . ; to test values 
TAN_RE DT ? 
TAN_IM DT ? 


: : ; in CODE32 segment 
EXTRN MQERCTAN: NEAR 


3 The following lines compute tan(Z_RE, Z_IM) and 
; store the real and imaginary components 
; of the result in TAN RE and TAN _IM. 


FLD Z_IM ; push, ST := Z_IM 

FLD Z_RE ; push, ST := Z_RE 

CALL MQERCTAN 3 (ST,ST(1)) := tan(ST,ST(1)) 
FSTP TAN_RE ; Store real component, pop ST 
FSTP TAN_IM ; Store imaginary component, 


pop ST. 


; TAN_RE is about 0.0045. 
3 TAN_IM is about 1.0021. 
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maqerCTNH 


Returns complex hyperbolic tangent 


Function 


(ST, ST(1)) := tanh(ST, ST(1)) oO 


(Tanh_Re, Tanh_Im) := tanh(z_re, z_im) if -© < z_im < +0 


Discussion 


mqerCTNH returns the complex hyperbolic tangent of the complex 
number z with real and imaginary components (z_re, z_im). 


Tanh(z) is defined mathematically in terms of sinh(z) and cosh(z): 


sinh(z) 
tanh(z) = 

cosh(z) 
The real and imaginary components are defined in terms of real 
functions: 
tanh(z) = tanh(z_re, z_im) = (Tanh_Re, Tanh_Im) 
where 

(sinh(z_re) * cosh(z_re)) * (1 + tar? (z_im)) 

Tanh_Re = 2 

cost? (z_re) + (sint? (z_re) * tart (z_im)) 

tan(z_im) 

Tanh_Im = 


cost? (z_re) + (sint® (z_re) * tart (z_im)) 
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mqerCTNH (continued) 
Exceptions 


Possible exceptions are Invalid, Denormal, Overflow, and Underflow: 


masked, mgerCTNH returns the QNaN indefinite to affected 
components of the result. If I is unmasked, control passes to the 
exception handler with the input z_im still in ST(1), z_re still in 
ST, and the exception opcode set. 


Oo I Input SNaNs and z_im = + cause the I exception. If I is 


D Input denormals cause the D exception. If D is masked, 
mqerCTNH returns its result. If D is unmasked, control passes to 
the exception handler with z_im still in ST(1), z_re still in ST, 
and the exception opcode set. 


O Component resuits whose exponents are too large to fit in 
extended format cause the O exception. If O is masked, 
mqerCTNH returns + to affected components of the result. If O 
is unmasked, control passes to the exception handler with z_im 
still in ST), z_re still in ST, and the exception opcode set. 


U Component results that are too tiny to fit accurately in extended 

format cause the U exception if U is masked. In this case, 

i) mqerCTNH returns a gradual underflow denormal to affected 
components of the result, if possible; otherwise, it returns +0. 
Component results that are too tiny to be represented as 
normalized numbers cause the U exception if U is unmasked. In 
this case, control passes to the exception handler with z_im still in 
ST(1), z_re still in ST, and the exception opcode set. 


Exception Opcode 
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maqerCTNH (continued) 
Example 


maerTNH returns tanh(z_re, z_im) for the complex number z. 


: : ; in DATA segment ae) 
ZRE OT 1.0 3; initialized 
ZIM DT 3.0 3; to test values 
TANH RE DT ? 


TANH_IM DT ? 


: : ; in CODE32 segment 
EXTRN MQERCTNH: NEAR 


3 The following lines compute tanh(Z_RE, Z_IM) and 
; store the real and imaginary components 
; of the result in TANH RE and TANH_IM. 


FLD Z_IM 3 push, ST := Z_IM 

FLD Z_RE 3 push, ST := Z_RE 

CALL MQERCTNH 3 (ST,ST(1)) := tanh(ST,ST(1)) 

FSTP TANH_RE ; Store real component, pop ST 

FSTP TANH_IM 3; Store imaginary component, oO 
3 pop ST. 


; TANH_RE is about 0.7680. 
3 TANH_IM is about -0.0592. 
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Chapter 4 
Exception Handling Library 


This chapter has two major sections: 
1. An overview of the 80387 Exception Handling Library (EH387) 
2. A reference for both EH387 routines 


4.1 Library Overview 


The 80386-based 80387 Exception Handling Library consists of two 
utility routines: DECODE and ENCODE. These routines make 
writing exception handlers easier. Exception handlers are system- 
level routines called when a floating-point operation reports an 
unmasked 80387 exception. 


A customized exception handler can make your code more efficient, 
particularly when a program must test for exceptions that seldom 
occur. For example, suppose you have a program with a loop where 
overflow might happen once in a thousand iterations. Perhaps the 
program masks O in the 80387 Control Word and tests the 80387 
Status Word’s exception byte for a set O bit at every iteration. Then, 
the program jumps to the next iteration when O is clear but jumps to 
some corrective code when O is set. For such a program, 999 of 1000 
overflow checks would be wasted effort that slowed execution. With 
DECODE and ENCODE, your program can unmask overflow, put the 
corrective code in an exception handler, and pay the price for 
overflow only when it occurs. 


DECODE identifies the DC387 routine, CL387 function, or 80387 
instruction where an unmasked exception occurred. It also saves the 
machine state of the 80387 and preserves the offending operation’s 
arguments or results. DECODE eliminates much of the effort needed 
to determine what operation and which unmasked exception caused 
the call to an exception handler. 


Your exception handler can determine how each unmasked exception 
should be corrected, according to the needs of your code. 


ENCODE performs a choice of concluding actions inside your 
exception handler, either retrying the offending operation or returning 
a result specified by the handler. It also restores the saved machine 
state of the 80387, providing a common path for exiting the exception 
handler and resuming execution of the interrupted program. 


The following subsections explain: 


e The declaration of EH387 routines in ASM386 exception handlers 


e EH387 linkage requirements, stack requirements, and register 
usage 


e EH387 parameters, results, and the ESTATE387 data structure that 
contains information stored by DECODE and accessed by the 
handler and ENCODE 


e The protocols for writing an exception handler with EH387 
e An ASM386 template for an exception handler 


4.1.1 Declaring EH387 Routines in ASM386 Exception Handlers 


The 80387 Exception Handling Library can be linked to code that is 
within the same code segment or to code that is in another code 
segment. However, you must declare the EH387 routines within the 
calling modules. For example, when a module calls DECODE, make 
one of the following declarations: 


e If you want your exception handler to be within the same segment 
as EH387, use the EH387N.LIB (near library). Declare DECODE 
as follows before calling this routine: 


CODE32 SEGMENT ER ; Segment name must be CODE32. 
; EH387 segments are USE32. 
EXTRN DECODE: NEAR ; DECODE is now callable. 


CODE32 ENDS 


e If you want your exception handler to be in a different segment 
from EH387, use the EH387F.LIB (far library). Declare DECODE 
as follows before calling this routine: 


EXTRN DECODE: FAR ; Declaration must be outside 


; all SEGMENT..ENDS pairs 
3; of the module. 


Exception Handling Library 


Oo 


4.1.2 


See Section 4.1.8 for an example that declares DECODE and ENCODE 
for linkage with the EH387 near library. See the reference pages in 
Section 4.2 for ASM386 examples of how to declare these routines for 
linkage with the EH387 far library. See Appendix B for more 
information about declaring these routines in high-level language 
modules. 


Linking with EH387 


EH387 can be linked with the OMF386 output of any Intel translator 
to execute on an 80387 or on an 80386 with a true software emulator. 


In addition to DECODE and ENCODE, EH387 contains a set of 
alternate PUBLIC names for its own routines, which are used by some 
Intel translators. See Appendix A for a list of all DC387, CL387, and 
EH387 PUBLIC symbols. 


4.1.3 EH387 Stack Requirements 


EH387 requires no working 80387 stack positions. EH387N.LIB 
requires 384 bytes on the 80386 stack for its internal storage; 
EH387F.LIB requires 448 bytes. EH387 itself allocates the required 
stack bytes within its modules. However, a reentrant exception 
handler should allocate an additional 384 (near library) or 448 (far 
library) bytes on the 80386 stack at each recursive call. 


4.1.4 EH387 Register Usage 


EH387 conforms to the register-saving conventions of Intel 80386 
high-level languages. According to these conventions: 


e The EH387 routines must leave the 80386 DS, ES, SS, and EBP 
registers unchanged. For EH387N.LIB, ES and SS are assumed to 
access the same combined data/stack segment (DATA) as DS. 


e The EH387 routines may destroy the contents of the EAX, EBX, 
ECX, EDX, EDI, ESI, FS, and GS registers. 
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However, an exception handler is an interrupt routine. It must save 
the 80386 registers whose contents it alters during execution. See 
Section 4.1.7 for more information about exception handler protocols. 


4.1.5 EH387 Parameters and Results 


Parameters to the EH387 routines must be pushed onto the 80386 
stack. The segment part of a far pointer must be pushed as a 4-byte 
quantity because EH387 uses a 32-bit wide stack. Any push of a 
segment register in a USE32 segment automatically pushes 4 bytes on 
the stack. Both DECODE and ENCODE pop their parameters from 
the stack before returning control to the exception handler. 


DECODE and ENCODE both require the following parameters: 

e A pointer to an ESTATE387 data structure 

e An uncleared copy of the 80387 exception byte from the 
interrupted code 

ENCODE requires two additional parameters: 


e A version of the 80387 Control Word, possibly altered by the 
exception handler to retry the interrupted operation 


e A Boolean byte that the exception handler sets (1) to make 
ENCODE re-execute the interrupted operation and clears (0) to 
make ENCODE restore the 80387 machine state 


DECODE stores its results, including 80387 machine state 
information, in the ESTATE387 data structure. ENCODE restores the 
information saved by DECODE, including any changes to ESTATE387 
made in the exception handler, to the 80387 machine state. 


See the reference pages in Section 4.2 for details about parameters to 
these routines and Section 4.1.6 for a description of ESTATE387. 
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4.1.6 ESTATE387 


ESTATE387 is a 158-byte data structure filled by the EH387 


DECODE routine. Its fields contain information about the identity of 
the offending operation, the formats and values of its arguments, and 


the machine state of the 80387. For certain 80387 numeric 
exceptions, ESTATE387 contains already calculated results, rather 


than arguments. Figure 4-1 illustrates the ESTATE387 data structure. 


ARG1(0) ARGUMENT OPERATION 


Byte offset 


) 
Ce 
: 
ec 
; 
: 
; 
eB 
a 
: 
“ 

(80387 State Is 108 bytes for USE32) ¢ 

“ ~ 

x ~ 
Figure 4-1 ESTATE387 Layout PCD0021 
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The byte offsets in Figure 4-1 are decimal values, as are the offsets 
mentioned in the following description of each ESTATE387 field: 


OPERATION _ is a 16-bit word at offset 0. It contains an exception 
opcode identifying which DC387 routine, CL387 
function, or 80387 instruction reported the unmasked oO 
exception. See Appendix F for a summary of the 
DC387 and CL387 exception opcodes. See Appendix E 
for the 80387 instruction exception opcodes. 


ARGUMENT is a byte at offset 2. It identifies the types and 
locations of the interrupted operation’s arguments. 
Figure 4-2 shows the format of the ARGUMENT byte. 


7 6 5 4 3 2 1 i} 
be Lace | | | | 
? 2 
CMX ATYP2 PSH ATYP1 


Figure 4-2 ARGUMENT Byte in ESTATE387 = °000022 


PSH (bit 3) is set (1 = true) if the result is to be 
pushed onto the 80387 stack rather than 
replacing one or more input arguments. 


CMX = (bit 7) is set (1 = true) if a CL387 complex 
function caused the exception: arguments to 
the offending function are in the ST..ST(1) or 
ST..ST(3) fields of SAVE387, not in the 
ESTATE387 ARG1 and ARG2 fields. 


ATYP1 and ATYP2 = (bits 0..2 and 4..6) indicate the 80387 data 
types of ARGI at offset 3 and of ARG2 at 
offset 14 in ESTATE387, according to the oO 
code values in Table 4-1. ; 
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Table 4-1 Atyp or Rtyp Field Values 


Value Meaning 


0 no operand 

1 ST - 80387 stack top 

2 ST(1) - next 80387 stack element 

3 ST(i) - element specified by REGISTER field 
(at offset 49 in ESTATE387) 

4 number in 80386 memory of type specified by FORMAT field 
(at offset 48 in ESTATE387) 

5 80-bit extended format operand 

6 64-bit long integer operand 

7 80-bit BCD (binary coded decimal) integer operand 


ARG1 is a 5-word array at offset 3 in the ESTATE387 
Structure. It contains the destination argument (or 
leftmost argument for CL387 functions) to the 
operation in the format specified by ARGUMENT’s 
ATYP1 field (see Figure 4-2). 


ARG1_FULL is a Boolean byte at offset 13. Its least significant bit 
is set (1 = true) if ARGI is present. ARGI is 
undefined if the exception handler is called after the 
interrupted operation is complete. 


ARG2 is a 5-word array at offset 14. It contains the second 
argument to the operation in the format specified by 
ARGUMENT?’s ATYP2 field (see Figure 4-2). 


ARG2_FULL is a Boolean byte at offset 24. Its least significant bit 
is set if ARG2 is present. ARG2 is undefined if 
there is only one argument or if the exception handler 
is called after the interrupted operation is complete. 


RESULT is a byte at offset 25. It identifies the types and 
locations of the interrupted operation’s results. Figure 
4-3 shows the format of the RESULT byte. 
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Figure 4-3 RESULT Byte in ESTATE387 


PCD0023 


1POP (bit 3) is set if the operation causes the 80387 
stack to pop exactly once. 


2POP (bit 7) is set if the operation causes the 80387 
stack to pop twice. 


RTYP1 and RTYP2 (bits'0..2 and 4..6) indicate the 80387 data 


RES1 


RES1_FULL 


RES2 


RES2_FULL 


FORMAT 


types of RES] and of RES2, using the code 
values listed in Table 4-1. 


is a 5-word array at offset 26 in the ESTATE387 
structure. It contains the first result of the operation 
in the format specified by RESULT’s RTYP!1 field. 


is a Boolean byte at offset 36. Its least significant bit 
is set (1 = true) if RES] is present. RES! is undefined 
if the exception handler is called before the interrupted 
operation is complete. 


is a 5-word array at offset 37. It contains the second 
result of the operation in the format specified by 
RESULT’s RTYP2 field. 


is a Boolean byte at offset 47. Its least significant bit 
is set if RES2 is present. RES2 is undefined if only 
one result exists or if the exception handler is called 
before the interrupted operation is complete. 


is a byte at offset 48. It specifies the 80387 data type 
in memory when an ATYP or RTYP field of 
ARGUMENT or RESULT has the value 4 (see Table 
4-1); only one such field ever exists. Table 4-2 shows 
possible values for FORMAT. 
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Table 4-2 FORMAT Byte Values 


Value Meaning 


32-bit single format 
32-bit short integer 
64-bit double format 
16-bit word integer 


Ono 


REGISTER is a byte at offset 49 in the ESTATE387 structure. It 
specifies the 80387 stack position for an argument or 
result when an ATYP or RTYP field (see Figures 4-2 
and 4-3) has the value 3 (see Table 4-1). The values 
of REGISTER range from 0 for ST (stack top) to 7. 


SAVE387 _is a 108-byte array at offset 50. It contains the 
machine state of the 80387 as defined by the 80387 
FSAVE/FNSAVE instructions in USE32 segments: a 
32-bit 80387 Environment followed by the 80387 stack. 
ST is at offset 78 in ESTATE387. 


The 80387 Status Word stored in SAVE387 is not the interrupted 
operation’s Status Word. The exception handler must clear 80387 
exceptions before calling the EH387 DECODE routine, and the 
handler must maintain the uncleared Status Word separately as a 
required parameter to both EH387 routines. See Section 4.1.7 for 
more information about these requirements. 


Exception Handling Library 4-9 


4.1.7 Protocols for Writing an EH387 Exception Handler 


EH387 eliminates the difficult aspects of interfacing to the 80387 for 
exception recovery. However, a strict protocol must be followed: 


1. The handler must be an interrupt routine for the 80386 Processor 
Extension Error Trap (interrupt vector 16). You must enter its 
interrupt descriptor in the IDT (Interrupt Descriptor Table) using 
the system builder (BLD386). 


2. Preserve all 80386 registers and use the IRETD instruction (see 
step 9) to transfer control back to the code that called the handler. 
The 80386 EFLAGS register is automatically saved and restored 
because the handler is an interrupt routine. 


3. Use FNSTSW as the first 80387 instruction in the handler. This 
instruction stores the 80387 Status Word in a 16-bit memory 
location. The uncleared Status Word from the interrupted 
operation is a required parameter (XCPTNS387) for both EH387 
routines (see steps 5 and 7). 


4. Clear the 80387 exceptions with an FNCLEX instruction next. 
Exceptions must be cleared for the EH387 calls to work properly. 


5. Push the parameters (ESTATE387_ PTR and XCPTNS387) to 
DECODE onto the 80386 stack and call DECODE. 


Put your customized code for the exception handler next. 


If the handler is returning to the calling environment, push the 
parameters to ENCODE (ESTATE387_ PTR, XCPTNS387, 
RETRY_CONTROL, and RETRY_FLAG) onto the 80386 stack 
and call ENCODE. 


8. Restore the 80386 registers saved at the beginning of the 
exception handler (see step 2). 


9. Return control to the interrupted code with an IRETD instruction. 


See Section 4.1.8 for an ASM386 template that follows these protocols. 
Note that a recursive call to the exception handler can occur if 
ENCODE retries an operation with exceptions unmasked. Allocate all 
data storage used by DECODE, the handler, and ENCODE on the 
80386 stack if recursion is possible. 
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4.1.8 EH387 Exception Handler Template in ASM386 


NAME HANDLER_387 3; module name 


; DATA segment can have declarations here. 

; For EH387N.LIB, DS, ES, and SS point to combined 

3 data/stack segment named DATA. For EH387F.LIB, DS 
3 points to DATA and SS points to STACK. 


CODE32 SEGMENT ER PUBLIC 
I MASK EQU 0001H I exception is bit 0 in 
the 80837 Control Word 

and Status Word. 

Masks for other exceptions 


can go here. 


we we we we we 


EXTRN DECODE: NEAR 3; EH387 routines must be 
EXTRN ENCODE: NEAR ; declared external. 


3 STACK_LAYOUT includes ESTATE387. It sets up 
3 a stack frame for the TRAP_HANDLER routine. 
STACK_LAYOUT STRUC 3 pointed at by EBP 
OPERATION DW ? ; ESTATE387 begins here. 
ARGUMENT DB ? 
ARG1 DW 5 DUP(?) 
ARG1_FULL DB ? 
ARG2 DW 5 DUP(?) 
ARG2_FULL DB ? 
RESULT DB ? 
RES1 DW 5  DUP(?) 
RES1 FULL DB ? 
RES2 DW 5 DUP(?) 
RES2 FULL DB ? 
FORMAT OB ? 
REGISTER DB ? 
; Next is the 108-byte SAVE387 array for 
; 80387 machine state saved in ESTATE387. 
CONTROL WORD DW 2 DUP(?) 
STATUS WORD DW 2 DUP(?) 3; to be saved 
; after exceptions cleared 
TAG_WORD DW 2 DUP(?) 


Exception Handling Library 


4-11 


XCPTN_PTRS includes 32-bit Real Address mode's 80387 
Instruction Pointer, Opcode, and Operand Pointer 

or 32-bit Protected mode's 80387 Instruction Pointer 

Offset, Opcode, CS Selector, Operand Pointer 

Offset, and Operand Selector fields. #) 
XCPTN_PTRS DQ 2 DUP(?) 


we we we we we 


STACK387 DT 8 DUP(?) 3; ESTATE387 ends here. 
RETRY_CONTROL DW ? 3 retry 80387 Control 

; Word setting for ENCODE 
RETRY FLAG DB ? ; Boolean parameter to ENCODE 
XCPTNS387 DW ? ; 80387 Status Word 

3 before it is cleared 


Put any additional stack-allocated variables 

for custom code here. Reference them as 
[EBP].your_var_name. Additional stack bytes should 
align on a 4-byte boundary. Change the allocation 
for the following dummy variable as necessary. 


we we we we we 


FOUR_ALIGN DB ? ; Keep ESP on 4-byte boundary. Oo 


3 REGISTERS386 is allocation for the 80386 registers 
3 saved by TRAP_HANDLER routine. 
REGISTERS386 DD 12 DUP (7) 


SAVE_EIP DD ? 3; for return from 
SAVE_CS DD ? 3 TRAP_HANDLER routine 
FLAGS386 DD ? for EFLAGS register pushed 
by 80386 when INT call 
causes control transfer 
to TRAP_HANDLER routine 


we es we we 


STACK_LAYOUT ENDS 

; TRAP_HANDLER is a template for an 80387 exception 

3 handler in ASM386 using EH387. It assumes that the 

; only unmasked exception is Invalid Operation. Oo 


TRAP_HANDLER PROC FAR 
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we we we we we we we we 


The next five lines save the 80386 general and 
segment registers on the stack. You can modify 
these to save only those registers that your 
handler uses. If you make changes here, you should 
make corresponding changes immediately before 
TRAP_HANDLER's IRETD, and you should alter 
REGISTERS386 in the STACK_LAYOUT to allocate 

as much storage as your saved registers need. 


PUSHAD ; Push 8 general registers. 
PUSH DS ; Push data segment 

PUSH ES ; registers. 

PUSH FS 

PUSH GS 


Allocate room for rest of STACK_LAYOUT structure. 
SUB ESP, OFFSET REGISTERS386 


Set up indexing into STACK _LAYOUT. 
MOV EBP, ESP 


Save exceptions that caused interrupt to handler. 
FNSTSW [EBP] .XCPTNS387 


Clear exceptions so exception handler can use 80387. 
FNCLEX 


Push parameters to EH387 DECODE routine onto stack 
with PUSH ESTATE_XCPTNS routine, declared following 
TRAP_HANDLER. 

CALL PUSH_ESTATE_XCPTNS 


CALL DECODE 3 fills ESTATE387 


The next three lines make Control Word of the 

interrupted code the default for an ENCODE retry. 

MOV AX, [EBP] .CONTROL_WORD 

MOV [EBP] .RETRY_CONTROL, AX 

MOV [EBP].RETRY FLAG, OFFH ; Retry will 
3 occur. 
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; Mask I exception: ENCODE retry will supply 
default results for Invalid Operation. 
OR [EBP] .RETRY_CONTROL,I_MASK 


3; Was I exception bit set? 
TEST [EBP] .XCPTNS387, I MASK 
JNZ ACTUAL_I_XCPTN 


Examine [EBP] .XCPTNS387 here to detect other 
exceptions, and insert your customized code 
between the labels ACTUAL_I_XCPTN and ENCODE_EXIT 
to handle other unmasked exceptions. 


we we we we 


JMP ENCODE_EXIT 
ACTUAL_I_XCPTN: 


; Put your customized code for I exceptions here. 

You may include a call to ENCODE if you want it to 
retry the operation that reported the I exception, 
but clear RETRY FLAG before exit through ENCODE EXIT 
if yeu don’ t want another retry. 


we we we we we 


ENCODE EXIT: 

3; Push first two ENCODE parameters with a call to 

3 PUSH_ESTATE_XCPTNS, declared following TRAP_HANDLER. 
CALL | PUSH_ ESTATE __ XCPTNS 


; Push third ENCODE parameter. 
PUSH DWORD PTR [EBP] .RETRY_CONTROL 


; Push fourth ENCODE parameter. 
PUSH DWORD PTR [EBP] .RETRY_FLAG 


; Restore post-exception 80387 State. 
CALL ENCODE 


; Release the STACK_LAYOUT storage up to REGISTERS386. 
ADD ESP, OFFSET REGISTERS386 
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; The next five lines restore the 80386 general 
segment registers that were saved at 
beginning of TRAP_HANDLER. 

Ss 


wee 
oto 
otTrs 
u~7Oo 
m 


Return must be an IRETD instruction if TRAP_HANDLER 
was called from a USE32 segment with an INT 
instruction. IRETD restores 80386 EFLAGS register. 
IRETD 

TRAP_HANDLER ENDP 


we we we 


; PUSH_ESTATE_XCPTNS pushes two parameters 
3 (ESTATE387_PTR and XCPTNS387) to the EH387 
3; DECODE and ENCODE routines onto the stack. 
PUSH_ESTATE_XCPTNS PROC NEAR 
POP EDX 3; Save return address. 


For EH387F.LIB, segment part of ESTATE387_PTR 
should be pushed here with PUSH SS. 

For EH387N.LIB, you need to push only 

the offset part of ESTATE387_ PTR. 


we we we we 


3 Get offset part of ESTATE387_ PTR. 
LEA EAX, [EBP] .OPERATION 
PUSH EAX 3 ESTATE387_PTR pushed 


3 Push 80387 exceptions in low-order byte. 
PUSH DWORD PTR [EBP] .XCPTNS387 


JMP EDX 3 return to TRAP_HANDLER 
PUSH_ESTATE_XCPTNS ENDP 


oO 4.2 EH387 Reference 


This section contains a detailed reference for the EH387 DECODE 
and ENCODE routines. 
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DECODE 
Decode trapped operation 
and save 80387 status 


Parameters Oo 


Push these parameters onto the 80386 stack in-the following order 
before calling DECODE: 


1, ESTATE387_PTR is either a near (32-bit offset) or a far (16-bit 
segment, 32-bit offset) pointer to an ESTATE387 data structure 
(see Section 4.1.6). For a far ESTATE387_ PTR, push 
ESTATE387_PTR’s segment part first (32-bit push), followed by 
the offset. 


2. XCPTNS387 is a 16-bit variable pushed as 32 bits. Its low-order 
byte is the 80387 Status Word’s exception byte. XCPTNS387 
contains the 80387 exception byte in existence when the exception 
handler is called, before 80387 exceptions are cleared (see Section 
4.1.7). For DECODE, only the low-order byte of XCPTNS387 is 
meaningful. 


Discussion : © 


DECODE supplies information in a standardized format to an 
exception handler. This information includes: 


e The exception opcode that identifies the offending 80387 
instruction, DC387 routine, or CL387 function (Appendix E lists 
exception opcodes for instructions, Appendix F for DC387 and 
CL387 routines.) 


e The existence, formats, and values of arguments or results 


e The machine state of the 80387 when the exception occurred 


DECODE returns this information to the 158-byte buffer accessed by 
ESTATE387_ PTR (see Section 4.1.6 for a detailed description of the 
ESTATE387 fields). DECODE leaves the 80387 completely cleared to 
its initialized state, ready for use by an exception handler and ready 
for a call to the EH387 ENCODE routine. For 80387 
FCOMP/FCOMPP and FUCOMP/FUCOMP? instructions with 
denormal arguments, the exception handler is called with the inputs 
already popped off the 80387 stack. DECODE recovers these 
arguments and pushes them back on the top of the stack. 
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DECODE (continued) 
Example 


This example assumes declaration of the ESTATE387 structure inside 
STACK_LAYOUT as in Section 4.1.8, but not the declaration of the 
a) PUSH_ESTATE_XCPTNS routine. 


EXTRN DECODE: FAR 3; must be outside all 
3; SEGMENT..ENDS in module 


STACK_LAYOUT —STRUC 

STACK_LAYOUT ENDS 

DATA32 SEGMENT 

ESTATE STACK LAYOUT  ; ESTATE387 is first 158 bytes 
DATA32 ENDS 

HANDLER CODE SEGMENT ER PUBLIC 


oO ; Assume that DS points to DATA32 segment and that 
3; SS points to STACK32. Default for SEGMENT is USE32. 


FNSTSW  E_STATE.XCPTNS387 
FNCLEX 
PUSH DS 3 segment (E_ STATE) onto 80386 
stack (4-byte push) 
EAX := offset (E_STATE) 
E _STATE_PTR offset 
3; onto stack 
PUSH DWORD PTR E_STATE.XCPTNS387 
3; XCPTNS387 onto stack 


LEA EAX, E_STATE 
PUSH EAX 


we were 


CALL DECODE 


; E_STATE is now filled with information for use 
; by the exception handler and ENCODE. 
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ENCODE 
Restores 80387 status 
and operation environment 


Parameters oO 


Push these parameters onto the 80386 stack in the following order 
before calling ENCODE: 


1. ESTATE387_ PTR is either a near (32-bit offset) or a far (16-bit 
segment, 32-bit offset) pointer to the ESTATE387 data structure 
that was filled by a preceding call to DECODE and possibly 
modified by the handler. For a far ESTATE387_ PTR, push the 
segment part first (32-bit push), followed by the offset. 


2. XCPTNS387 is a 16-bit variable pushed as 32 bits. Its low-order 
byte is the 80387 Status Word’s exception byte. XCPTNS387 
contains the 80387 exception byte in existence when the exception 
handler is called, before 80387 exceptions are cleared (see Section 
4.1.7). For ENCODE, only the low-order byte of XCPTNS387 is 
meaningful. 


3. RETRY_CONTROL is a 16-bit variable pushed as 32 bits. It is a oO 
copy of the 80387 Control Word that can be modified by the 
exception handler. If RETRY_FLAG is false, ENCODE ignores 
RETRY_CONTROL. Otherwise, ENCODE substitutes 
RETRY_CONTROL for the 80387 Control Word when it retries 
the operation that caused the original exception. 


4. RETRY_FLAG is a one-byte variable pushed as 32 bits. It is a 
Boolean control input. If RETRY_FLAG is set (1 = true), 
ENCODE reads ESTATE387 to identify the operation that caused 
the exception, to restore the (possibly modified) 80387 machine 
state, and to retry the operation. 
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ENCODE (continued) 


Discussion 


Before calling ENCODE, the 80387 must be completely cleared to its 
initialized state. ENCODE obtains information about the 80387 from 
the ESTATE387 data structure (see Section 4.1.6), not from the entry 
state of the 80387 itself. ENCODE restores the 80387 machine state 

as it is represented in ESTATE387. 


If the least significant bit of RETRY_FLAG is 0, ENCODE assumes 
that the operation has already been performed and that results have 
been stored in ESTATE387. ENCODE copies the results to their 
destination, storing an appropriate 80387 indefinite value (see 
Appendix D) if results are missing from ESTATE387. 


If the least significant bit of RETRY_FLAG is 1, ENCODE 
identifies the offending operation from ESTATE387 and retries it 
with the arguments from ESTATE387. However, it uses 
RETRY_CONTROL as the 80387 Control Word for this retry 
operation; thus, the handler determines which exceptions are 
unmasked. After the retry operation is complete, ENCODE restores 
the 80387 Control Word from ESTATE387. 


If RETRY_CONTROL has unmasked exceptions, a recursive call to 
the exception handler can occur. To avoid infinite recursion, the 
exception handler must modify the arguments if it unmasks the 
original exception in RETRY_CONTROL, sets RETRY_FLAG, and 
calls ENCODE. 


ENCODE returns with the 80387 restored to the post-exception state 
determined by the exception handler. 
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ENCODE (continued) 
Example 


This example assumes declaration of the ESTATE387 structure inside 
STACK_LAYOUT as in the DECODE example. 


EXTRN ENCODE: FAR 3; must be outside all © 
; SEGMENT..ENDS in module 


STACK LAYOUT STRUC 
STACK LAYOUT ENDS 
DATA32 SEGMENT 


ESTATE387 is first 158 bytes 
RETRY FLAG, RETRY CONTROL, 
XCPTNS387, and FOUR_ALIGN 
are next 6 bytes. Stack 
should be aligned 

on 4-byte boundaries. 


E STATE STACK_LAYOUT 


we we we we we we 


DATA32 ENDS re) 
HANDLER_CODE SEGMENT ER PUBLIC 
Assume that DS points to DATA32 segment, SS points 


: to STACK32, and that parameters to ENCODE are set 
; to appropriate values. Default for SEGMENT is USE32. 


PUSH DS 3 segment(E STATE) onto 80386 
3 stack (4-byte push) 

LEA EAX, E STATE | 3 EAX := offset (E_STATE) 

PUSH EAX ; E_STATE_PTR offset 
; onto stack 

MOV AX, E_STATE.XCPTNS387 

PUSH EAX 3 XCPTNS387 onto stack 

MOV AX, E_STATE.RETRY_CONTROL 

PUSH EAX 3 RETRY CONTROL onto stack 

MOV AL, E_STATE.RETRY_FLAG 

PUSH EAX 3 RETRY_FLAG onto stack oO 


CALL ENCODE 


; 80387 is now restored to an appropriate 
3; post-exception state. 
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Appendix A 
80387 Support Library PUBLIC Symbols 


oO Each of the 80387 Support Libraries use some PUBLIC symbols other 
than the names of routines described in this manual. These are 
internal names, used either in the libraries or by Intel translators. 


The following sections list the PUBLIC names for each 80387 Support 
Library in alphanumeric order. 


A.1 Initialization Library PUBLIC Symbols 


The PUBLIC symbols of 80387N.LiB and 80387F.LIB are INIT87 and 


INITFP, 
A.2 DC387 PUBLIC Symbols 

MQCBINDEC MQCHK_UNMSKD_O_U_ERR MQCXDBDB 
MQCBIN_DECLOW MQCLONG_TEMP MQCXDBSNG 
MQCDBX MQCSHORT_TEMP MQCXSN 
MQCDBXDB MQCSNGL_XTND MQCXTND_DUBL 
MQCDECBIN MQCSNGXDB MQCXTND_SNGL 
MQCDECBINLO MQCSNX MQPOWER_OF_10 
MQCDECLOW_BIN MQCTEMP_LONG MQSTACK 
MQCDEC_BIN MQCTEMP_ SHORT MQUNMSKD_OV_OR_UN 
MQCDUBL_XTND MQCXDB " MQXCPTN_RTRN 


Oo 


A.3 CL387 PUBLIC Symbols 


MQERACS 
MQERAIN 
MQERANT 
MQERASH 
MQERASN 
MQERAT2 
MQERATN 
MQERCABS 
MQERCACH 
MQERCACS 
MQERCASH 
MQERCASN 
MQERCATH 
MQERCATN 


MQERCC2C: - 


MQERCC2R 
MQERCCI2 
MQERCCI4 
MQERCCIS 
MQERCCOS 
MQERCCSH 
MQERCDIV 
MQERCEXP 
MQERCI2 

MQERCLGE 
MQERCMUL 
MQERCOS 

MQERCPOL 
MQERCPRJ 
MQERCR2C 
MQERCREC 
MQERCSH 

MQERCSIN 
MQERCSNH 
MQERCSQR 
MQERCTAN 
MQERCTNH 
MQERDIM 

MQEREXP 

MQERIA2 
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*” MQERIRT 


MQERIA4 
MQERIA8 
MQERIAX 
MQERIC2 
MQERIC4 
MQERIC8 
MQERICX 
MQERIE2 . 
MQERIE4 
MQERIE8 
MQERIEX 
MQERINT 


MQERLGD 


‘MQERLGE 


MQERMAX 
MQERMIN 
MQERMOD 
MQERNI2 
MQERNIN 
MQERRI2 


-MQERRMD 


MQERRNT 
MQERSGN 
MQERSIN 
MQERSNH 
MQERSTACK 
MQERTAN 
MQERTNH 
MQERY2X 
MQERYI2 
MQERY14 
MQERY18 
MQERYIS 
MQ_1 
MQ_2XM1 
MQ_63U 
MQ_63U1 
MQ_63UPI2 
MQ_AT2 


“MQ_DXIT 


MQ_BLOAT 
MQ_CASNS 


MQ_CATNS 
-MQCCOSS Cw) 


MQ_CMUL 
MQ_CONST 
MQ_COS 
MQ_CP2N63 
MQ_CSINS 
MQ_CTANS 
MQ_DECIDE 
MQ_DX1 


MQ_DXP12 
MQ_EXIT ° 
MQ_EXM1 
MQ_I 
MQ_IRCHK 


* MQ LOG 


MQ_LOG10 . : oO 
MQ_LOGDN 7, 
MQ_MQRPI 


~-MQCNAN 
~ MQ_NOF 


MQ_NORM 
MQ_NQ 

MQ_OF 

MQ_PO 
MQ_PI2 
MQ_PII 

MQ_Q 

MQ_RAD 
MQ_RERR 
MQ_RSTR_86STAK 
MQ_SCALCEXP 


MQ_SIN 
MQ_TXAM oO 
MQ_UO 


MQ_YL2X 
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A.4 EH387 PUBLIC Symbols 


DECODE TQINSTRUCTION RETRY 
ENCODE TQPOP_THE TOP 
TQDECODE87 TQRESTORE PTRS 
TQENCODE87 TQSAVE_PTRS 
TQFETCH_AND_ STORE TQSTACK 


80387 Support Library PUBLIC Symbols 


TQUNPOP_THE_TOP 
TQ_320 
TQ_322 
TQ_STATUS_CHECK 
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Appendix B 


High-level Languages and the 80387 Support Library 


The 80387 Support Library routines can be linked with the OMF386 
output of any Intel translator. Thus, high-level language programs 
can call most 80387 Support Library routines, provided the following 
requirements are met: 


e The routine must be declared external in the calling module. 


e Required parameters or arguments to the routine must be set up in 
the calling language. 


e The appropriate near or far 80387 Support Library files must be 
linked with the calling program. 


Some languages, such as C and PL/M, do not support arithmetic 
operations on complex numbers. Such languages cannot call the 
CL387 complex functions directly. However, it is possible to write an 
ASM386 interface routine to push complex arguments onto the 80387 
stack, call the CL387 complex function, pop its component results off 
the 80387 stack, and store them. 


This appendix shows PL/M-386 examples of how to declare, call, and 
use representative Support Library routines as a guide for high-level 
language programmers. These examples are comparable to the 
ASM386 examples for mqcBIN_DECLOW and mqcDECLOW_BIN in 
Chapter 2, mqerACS and mqerIE2 in Chapter 3, and the exception 
handling template in Chapter 4. However, the PL/M calls to 
INITSREALSMATHSUNIT make calls to the 80387 Initialization 
Library unnecessary. 


Consult your language manual for information about its calling 
conventions. 


B.1 Decimal Conversion Routines 


The following PL/M-386 examples show a near call to 
mqcBIN_DECLOW and a far call to mqcDECLOW_BIN. The first 
example must be linked with DC387N.LIB, and the second with 
DC387F.LIB. 


B.1.1 Near Call to mqcBIN_DECLOW 


/*** The PL/M default segmentation model, smal] ram, 
uses 4-byte (offset only) pointers. For PL/M-386, 
the medium and the small models of segmentation 
use 4-byte pointers, the large and compact models 
6-byte (segment selector and offset) pointers. 

we] 

$WORD32 

/*** The WORD32 control is used here. Since the 
WORD32 control changes the size of some data 
types, check the structures if WORDI6 is used! 


wRK | 


BINDEC:DO; 


mqcBIN DECLOW: PROCEDURE (block_ptr) EXTERNAL; 
DECLARE block_ptr POINTER; 
END mqcBIN DECLOW; 


DECLARE FALSE LITERALLY *(1=0)'; 
DECLARE TRUE LITERALLY '(0=0)'; 


/*** The following procedure converts the WORD value 
from mqcBIN DECLOW to an ASCII equivalent. It 
expects a WORD value and a POINTER value. The 
WORD value (a$value) represents a 16-bit integer 
in two's complement notation. The pointer value 
(char$buf$ptr) points to (at least) a 6-byte area 
that will hold an ASCII string. The procedure 


returns the number of characters in the string. 
wRK / 


jnt_to_ascii: PROCEDURE (a$value, char$buf$ptr) BYTE; 


DECLARE char$buf$ptr POINTER; 
DECLARE a$value WORD; 
DECLARE char$buf BASED char$buf$ptr (1) BYTE; 


DECLARE count BYTE; 
DECLARE divisor INTEGER; 
DECLARE index BYTE; 
DECLARE int_value INTEGER; 


DECLARE print_zeros flag BYTE; 
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print_zeros_ flag = FALSE; 


count = 1; 
divisor = 10000; 
Oo int_value = INTEGER(a$value) ; 


IF int_value < 0 THEN DO; 
int_value = IABS (int_value); 
char$buf(0) = '-'; 
char$buf$ptr = @char$buf(1); 
count = count + 1; 

END; 


/*** The next loop does work: looping occurs after 
char$buf(0) contains nonzero elements when 
char$buf$ptr is set to address of char$buf(1). 


#KK 


DO index = 1 TO 4; 
char$buf(0) = BYTE(WORD(int_value/divisor))+'0'; 
int_value = int_value MOD divisor; 


#) _ divisor = divisor / 10; 


IF print_zeros flag THEN DO; 
char$buf$ptr = @char$buf(1); 
count = count + 1; 

END; 

ELSE IF char$buf(0) <> '0' THEN D0; 
char$buf$ptr = @char$buf(1); 
count = count + 1; 
print_zeros_ flag = TRUE; 

END; 

END; 


char$buf(0) = BYTE(WORD(int_value)) + '0'; 
RETURN (count); 


Oo END int_to_ascii; 


High-level Languages and the 80387 Support Library 


B-4 


/*** ADCB structure is declared next. Pointers to the 
binary and decimal buffers are 4-byte offsets, 
but _$buf$_segs fill ADCB fields so ADCB layout 
is proper for mqcBIN DECLOW. b$buf$seg, 
d$buf$seg, and scale are of type HWORD (16 bits) 
because the WORD32 control is used. If the 
WORD16 control is used instead, these fields 


must become WORDs. 
wee] 


DECLARE adcb$block STRUCTURE ( 
b$buf$off POINTER, 
b$buf$seg HWORD, 
presn BYTE, 
Ingth BYTE, 
d$buf$off POINTER, 
d$buf$seg HWORD, 
scale HWORD, 
sign BYTE); 


DECLARE SNGL_PRCSN LITERALLY '0'; 
DECLARE DUBL_PRCSN LITERALLY '2'; 
DECLARE XTND_PRCSN LITERALLY '3'; 


DECLARE real_var3 REAL; 
DECLARE digits buffer(6) BYTE; 
DECLARE final _buffer(15) BYTE; 
DECLARE count BYTE; 


CALL INIT$REAL$MATH$UNIT; 

/* Assume that REAL_VAR3 contains the hexadecimal 
value COE9A36D. */ 

real_var3 = REAL 

(1100$0000$1110$1001$1010$0011$0110$1101B) ; 

/*C 0 EB. 39 A BD */ 


adcb$block.b$buf$ptr = @real_var3; 
adcb$block.presn = SNGL_PRCSN; 
adcb$block.Ingth = LENGTH(digits_ buffer); 
adcb$block.d$buf$ptr = @digits_buffer; 


CALL mqcBIN DECLOW (@adcb$block) ; 
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* 


/*** The building blocks returned by mqcBIN DECLOW are 
constructed into 6-digit scientific notation 


format. 
we | 


*) final_buffer(0) = adcb$block.sign; 
final ~buffer(1) = digits. buffer(0); 
final buffer (2) = 
CALL MOVB (@digits suf fer(lys @final buffer(3), 
LENGTH(digits buffer) - 1); 
final_buffer(8) = 'E'; 


count = int_to_ascii (adcb$block.scale, 
@final_buffer(9)); 


/* FINAL_BUFFER now contains the string: 
""-7.30120E0'' 
*/ 


END; 


Oo B.1.2 Far Call to mqcDECLOW_BIN 


$WORD32 
/*** The WORD32 control is used here. Since the 
WORD32 control changes the size of some data 
types, check the structures if WORD16 is used! 
KKK | 
$LARGE (NUM387 HAS mqcDECBINLO; 
$ EXPORTS mqcDECLOW_ BIN) 
$COMPACT 
/*** The large subsystem control forces the 
mqcDECLOW BIN call to be a far call (segment 
selector and offset). The rest of the program 
is in the compact model of segmentation; any 
other calls will be near (offset only). The 
compact model of segmentation is used here to 
oO get 6-byte pointers in the structures. 


wkK 
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decbin:D0; 


DECLARE SNGL_PRSCN LITERALLY '0'; 


DECLARE adcb STRUCTURE ( 
b$buf$ptr POINTER, 
presn BYTE, 

Ingth BYTE, 
d$buf$ptr POINTER, 
scale HWORD, 
sign BYTE); 


mqcDECLOW BIN: PROCEDURE (block ptr) EXTERNAL; 
DECLARE block _ptr POINTER; 
END mqcDECLOW BIN; 


DECLARE real_var2 REAL; 
DECLARE digits_buffer(21) BYTE INITIAL ('371'); 


CALL 


[*e* 


KKK | 


adcb. fm 
«presn = SNGL_PRSCN; 
adcb. 
adcb. 
adcb. 
adcb. 


adcb 


CALL 


END; 


INIT$REAL$MATH$UNIT; 


The following code assumes DIGIT BUFFER contains 
a decimal string representing an integer number 
of pennies. It writes the number of dollars in 
SNGL_PRSCN binary format to REAL_VAR2. The 
dollar value to be converted is +371E-2 


b$buf$ptr = @real var2; 
Ingth = 3; 

d$buf$ptr = @digits buffer; 
scale = HWORD(-2); 


sign = ‘t's 


mqcDECLOW BIN(@adcb) ; 
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*) 


B.2 Common Elementary Real Functions 


The following PL/M-386 examples show a near call to mqerACS and 
a far call to mqerJE2. The first example must be linked with 
CL387N.LIB, and the second with CL387F.LIB. 


B.2.1 Near Call to mgerACS 
acs:D0; 


mqerACS: PROCEDURE (x) REAL EXTERNAL; 
DECLARE x REAL; 
END mqerACS; 


DECLARE hypotenuse REAL; 

DECLARE adjacent_side REAL; 

DECLARE angle radians REAL; 

DECLARE angle degrees REAL; 

DECLARE PI REAL DATA (3.14159265358979) ; 


CALL INIT$REAL$MATHSUNIT; 


/*** The following lines calculate the value of an 
angle of a right triangle, given the length of 
the hypotenuse and the adjacent side. mqerACS 
returns the value in radians; the value is then 
converted to degrees. 


wk / 
hypotenuse = .0; 
adjacent_side = 5.0; 


mgerACS (adjacent_side/hypotenuse) ; 


angle_radians 
(180.0/P1) * angle radians; 


angle_degrees 


roy 
unuo 


END; 


Oo 
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B.2.2 Far Call to mqerlE2 


$COMPACT 
$LARGE (NUM387 HAS RI2; 
$ EXPORTS mgerlE2) 


/*** The large subsystem control forces the mqerIE2 


call to be a far call (segment selector and 
offset). 


we / 

ie2:D0; 

mqerIE2: PROCEDURE (x) SHORTINT EXTERNAL; 
DECLARE x REAL; 

END mgerlE2; 


DECLARE real_var REAL; 
DECLARE integer_var SHORTINT; 


CALL INIT$REAL$MATH$UNIT; 


real_var = -8.5; 
integer_var = mgerIE2(real_var); 


/*** integer_var is now -8 ***/ 


END; 


B.3 Exception Handling Template 


This PL/M-386 template assumes that the 80386 will execute in 
32-bit protected mode, as shown by the Env387 structure declaration. 


It also assumes that the handler module will be linked with 
EH387N.LIB. 


$WORD32 
handler_module: DO; 
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/*** Al] the HWORDs are 16-bit quantities because 
the WORD32 control is used. (WORDs are 32-bit 
quantities.) If the WORD16 control is used, 
the HWORDs must become WORDs, and the WORDs must 
become DWORDs. 


wee | 


DECLARE I$error$bit LITERALLY '0001H'; 
/*** T exception is bit 0 in the 80387 Control and 
Status Words. Masks for other exceptions can 


go here. 
wR / 


DECLARE True LITERALLY 'OFFH'; 


DECLARE Env387 LITERALLY ‘STRUCTURE ( 
control _ word HWORD, 


reserved 1 HWORD, 
status word HWORD, 
/*** status word after clearing exceptions ***/ 

reserved 2 HWORD, 
tag_word HWORD, 
reserved 3 HWORD, 
eip_offset WORD, 

cs_selector HWORD, 
opcode HWORD, 


data_operand_off WORD, 
operand_selector HWORD, 


reserved 4 HWORD) '; 
DECLARE Stack387 LITERALLY ‘STRUCTURE ( 
stack_0(10) BYTE, 
stack_1(10) BYTE, 
stack 2(10) BYTE, 
stack_3(10) BYTE, 
stack 4(10) BYTE, 
stack_5(10) BYTE, 
stack _6(10) BYTE, 
stack_7(10) BYTE) '; 
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decode: PROCEDURE (estate387 ptr,errors387) EXTERNAL; 
DECLARE estate387 ptr, POINTER; 
DECLARE errors387 HWORD; 

END decode; 


encode: PROCEDURE (estate387_ptr, errors387, 
retry control, retry_flag) EXTERNAL; 
DECLARE estate387_ptr, POINTER; 
DECLARE errors387, HWORD; 
DECLARE retry control, HWORD; 
DECLARE retry flag, BYTE; 
END encode; 


/*** Trap handler is an 80387 exception handler 
template in PL/M-386 that calls the routines of 
EH387N.LIB. It assumes that the only unmasked 
exception is I, but shows where code for other 


exceptions could go. 
weK/ 


trap_handier: PROCEDURE INTERRUPT REENTRANT PUBLIC; 


DECLARE estate387 STRUCTURE ( 
operation HWORD, 


argument BYTE, 
arg1(5) HWORD, 
argl full BYTE, 
arg2(5) HWORD, 
arg2_full BYTE, 
result BYTE, 
res1(5) HWORD, 
resl full BYTE, 
res2(5) HWORD, 
res2_full BYTE, 
format BYTE, 
register BYTE, 


trap387env Env387, 
trap387stack Stack387); 


DECLARE retry control HWORD; 


DECLARE retry flag BYTE; 
DECLARE errors387 HWORD; 
DECLARE contro1387 HWORD; 
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Oo 


* 


/*** Any other variables you use must be declared 
inside the procedure. Because trap_handler is 
REENTRANT, variables are placed on the stack. 


wee | 


/*** Save the exception that caused the interrupt. 
GET$REAL$ERROR also clears the 80387 exceptions. 


ww / 


errors387 = GET$REAL$ERROR; 
CALL decode (@estate387,errors387); 


/*** Make control word when exception occurred the 
default for an encode retry operation and set 
retry_flag. Unless you change the value of 
retry flag later, the subsequent call to encode 
will cause a retry of the operation. 


KKK 
control1387 = estate387.trap387env.control_word; 
retry flag = True; 


/*** Mask the I exception bit in the control word ***/ 
retry_control = retry_control OR I$error$bit; 


/*** Test to see if I exception bit was set. ***/ 
IF (errors387 AND I$error$bit) THEN D0; 


/*** Put customized code for I exception here. ***/ 
END; 


/*** You can put code to check errors387 for other 
exceptions and to customize error recovery next. 

wRK | 

ELSE DO; 

END; 


CALL encode (@estate387,errors387, 
retry_control,retry_ flag); 


END trap handler; 
END handler_module; 
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Appendix C 
ANSI/IEEE Std 754-1985 Conformance 


The 80387 implements the JEEE Standard for Binary Floating-Point 
Arithmetic, ANSI/IEEE Std 754-1985, listed in the Preface. All of 
the 80386-based 80387 Support Libraries use the 80387 and this 
Standard as a guide for accuracy and performance. 


C.1 Decimal Conversion Library 


The Standard specifies requirements for the accuracy of decimal 
conversions of 32-bit single and 64-bit double format numbers. Since 
DC387 uses 80-bit extended format arithmetic to perform its 
conversions, it exceeds the Standard’s specifications. 


Table C-1 shows the range of single and double format numbers for 
which the Standard requires the best possible conversion accuracy 
both from decimal to binary and from binary to decimal. 


Table C-1 Correctly Rounded Decimal Conversion Ranges Required 


Decimal to Binary Binary to Decimal 
Format Significand Exponent Significand Exponent 
Single 10° -1 13 10° -4 13 
Double wo? 4 27 10" 4 27 


Table C-1 shows the number of decimal digits for which the Standard 
requires that decimal-to-binary and binary-to-decimal conversions be 
correctly rounded to the last bit. For example, it requires totally 
accurate single format binary-to-decimal conversions for positive 
values between and including 1E-13 and 999999999E13. DC387 
exceeds the requirements in Table C-1. 


The maximum number of significant digits that can be preserved on 
an in-and-out decimal-binary-decimal conversion can be determined 
mathematically for all floating-point formats. Such in-and-out 
conversions are accurate to the following: 


e 6 significant digits for 32-bit single format 
e 15 significant digits for 64-bit double format 
e 18 significant digits for 80-bit extended format 


DC387 realizes the best possible in-and-out decimal-binary-decimal 
conversion accuracy for every 80387 floating-point format. For 
example, DC387 guarantees that an 18-digit decimal number will 
retain its value when converted into extended format and then back to 
decimal. 


The minimum number of significant decimal digits that must be 
produced on an in-and-out binary-decimal-binary conversion can also 
be determined mathematically for all floating-point formats. Such in- 
and-out conversions require that at least: 


¢ 9 decimal digits be produced for 32-bit single format 
e 17 decimal digits be produced for 64-bit double format 
e 21 decimal digits be produced for 80-bit extended format 


DC387 realizes the best possible in-and-out binary-decimal-binary 
conversion accuracy for 80387 single and double format values. 
However, DC387 cannot guarantee that an extended format value will 
retain every bit when converted to decimal and then back to extended 
format. Such a degree of accuracy requires DC387 to perform 
arithmetic beyond extended precision, which is very slow. DC387’s 
loss of accuracy is, at worst, less than 3 bits for binary-decimal- 
binary extended format conversions. 


Table C-2 shows a wider range of numbers for which the Standard 
requires slightly less accuracy for conversions. For numbers in this 
wider range, the Standard allows a conversion error that is not to 
exceed the rounding error by more than 0.47 units in the destination’s 
least significant digit. DC387 also exceeds the requirements in Table 
C-2. 
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Table C-2 Decimal Conversion Ranges Required 


Decimal to Binary Binary to Decimal 
Format Significand Exponent Significand Exponent 
Single 10° -1 99 10° -1 53 
Double 10" =4 999 10! =4 340 


C.2 Common Elementary Function Library 


Although most of the CL387 functions are outside the scope of the 
Standard, these functions round results, perform arithmetic on 
infinities, operate with NaNs and report exceptions in a manner 
consistent with the Standard’s requirements. 


i) C.3 Exception Handling Library 


Oo 


The DECODE routine collects all the exception trapping information 
that is supplied by the 80386/80387 and required by the Standard: 


e The kind of operation being performed 
e The exceptions that occurred during the operation 
e The format of the destination 


e The rounded results for Overflow, Underflow, and Precision 
exceptions, even if a result will not fit in the destination format 


e The values of the operation’s arguments for Invalid and 
Zerodivide exceptions 
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Table C-2 Decimal Conversion Ranges Required 


Decimal to Binary Binary to Decimal 
Format Significand Exponent Significand Exponent 
Single 10° -4 99 10° -1 53 
Double 10'7 -4 999 1017 -4 340 


C.2 Common Elementary Function Library 


Although most of the CL387 functions are outside the scope of the 
Standard, these functions round results, perform arithmetic on 
infinities, operate with NaNs and report exceptions in a manner 
consistent with the Standard’s requirements. 


a) C.3 Exception Handling Library 


Oo 


The DECODE routine collects all the exception trapping information 
that is supplied by the 80386/80387 and required by the Standard: 


e The kind of operation being performed 
e The exceptions that occurred during the operation 
e The format of the destination 


e The rounded results for Overflow, Underflow, and Precision 
exceptions, even if a result will not fit in the destination format 


¢ The values of the operation’s arguments for Invalid and 
Zerodivide exceptions ; 
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Table C-2 Decimal Conversion Ranges Required 


Decimal to Binary Binary to Decimal 
Format Significand Exponent Significand Exponent 
Single 10° -1 99 10° -1 53 
Double i A 999 1g’? 24 340 


C.2 Common Elementary Function Library 


Although most of the CL387 functions are outside the scope of the 
Standard, these functions round results, perform arithmetic on 
infinities, operate with NaNs and report exceptions in a manner 
consistent with the Standard’s requirements. 


a) C.3 Exception Handling Library 


*) 


The DECODE routine collects all the exception trapping information 
that is supplied by the 80386/80387 and required by the Standard: 


e The kind of operation being performed 
e The exceptions that occurred during the operation 
e The format of the destination 


e The rounded results for Overflow, Underflow, and Precision 
exceptions, even if a result will not fit in the destination format 


e The values of the operation’s arguments for Invalid and 
Zerodivide exceptions 
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Appendix D 
80387 Numeric Data Formats 


oO The 80387 supports four integer and three real number formats. Each 
format stores the least significant digits of every number in the 
low-order byte that corresponds to the lowest 80386 memory address. 


D.1 Integer Formats 


Table D-1 summarizes the integer formats supported by the 80387. 


Table D-1 Integer Formats 


Format Range Precision . Fieids Indefinite 
Name approx (bits) Vaiue 

e) Word Integer 10° 16 bits * (15-0) 8000H 
ShortInteger 10° 32 bits * (31-0) 80000000H 
Longinteger 10'9 64 bits * (63-0) 8000000000000000H 
Packed BCD 10° 18 digits Sign (79) Bits 79-64 set 
Integer Digits . 


(71-0) 


* in Two’s Complement 


D.2 Real Formats 


Table D-2 summarizes the real formats supported by the 80387. 


Table D-2 Real Formats 


Format Range : Precision Fields Bit 

Number(s) 

Name approx in Field 

Single 10°38 24 bits Sign 31 
Exponent 30-23 


Significand * 22-0 


Double 10308 ‘53 bits Sign 63 
Exponent 62-52 
Significand *51-0 


Extended ads 64 bits Sign 79 
Exponent 78-64 
Significand 63-0 


* An implicit integer bit is part of the single and double formats. Thus, the single and 
double formats have 24 and 53 bits of precision even through their significands have 
23 and 52 bits, respectively. The extended format has an explicit integer bit stored in 
bit 63. 


Table D-3 summarizes the parameters of these real formats. 
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Parameter 


OQ Format width in bits 


P (bits of precision) 
Exponent width in bits 


Emax 
Emin 


Exponent bias (normalized) 


Real Number Format 


Single 


32 
24 


Table D-3 Summary of Real Format Parameters 


Double Extended 
80 
64 
15 
+ 16383 
— 16382 
+ 16383 


Table D-4 summarizes certain special values in each of these real 
formats. 


Table D-4 Real Zero, Infinity, and QNaN Indefinite Values 


Special 
Value 


+0 
-0 


oo 


—<o 


QNaN 
Indefinite 


80387 Numeric Data Formats 


Real Number Format 


Single 


00000000H 
80000000H 


7F800000H 
FF800000H 


FFCO0000H 


Double 


0..0H 
80..0H 


7FFO..0H 
FFFO..0H 


FFF80..0H 


Extended 


0..0H 
80..0H 


7FFF80..0H 
FFFF80..0H 


FFFFCO..0H 


Oo 


Appendix E 
ASM386 Floating-Point Instructions 


This appendix summarizes the ASM386 floating-point instructions in 
alphanumeric order and in a series of tables with the following 


columns: 


Opcode 


This column lists the hexadecimal machine code for each instruction. 
It uses the following notation: 


+/ 


adds a digit in the range 0..7 to the opcode; /is an 
index to the floating-point stack element that is an 
operand of the instruction. 


foilowed by a digit denotes the reg field value of the 
opcode’s ModRM byte. 


Floating-Point Instruction 
This column lists each floating-point instruction as it would appear in 
an ASM386 program. It uses the following notation: 


ST 


ST(/) 


m prefix 


r suffix 


d suffix 


j suffix 


by suffix 


is the top element of the floating-point stack (pushed 
last, popped first); ST is equivalent to ST(0). 


is any element of the floating-point stack; /is a digit in 
the range 0..7. 


denotes a memory operand. 


denotes a real operand in 32-bit single, 64-bit double, 
or 80-bit extended format. 


denotes an integer operand in 80-bit binary coded 
decimal (BCD) format. 


denotes an integer operand in 16-bit word, 32-bit 
short, or 64-bit long format. 


denotes an operand whose length is measured in bytes. 
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Excp. Code 


This column lists the hexadecimal! value returned by the EH387 
DECODE routine to the OPERATION field of the ESTATE387 
structure (see Chapter 4). 


Numerics Exceptions 
This column lists exceptions that the 80387 can generate for each 
instruction. It uses the following notation: 


IS 


denotes the Invalid Stack exception. This occurs when 


_ an operation causes stack overflow (trying to push an 


operand onto a non-empty stack element) or stack 
underflow (trying to pop an empty stack, element or to 
use an empty stack element as an operand). 


denotes the Invalid exception. This occurs when an 
Operation causes indeterminate results (such as 0/0 or 
attempting to take the square root of a negative 
number). 


denotes the Denormal exception. This occurs when an 
instruction attempts to operate on a denormal operand. 


denotes the Zerodivide exception. This occurs when an 
operation on finite operands produces, without 
overflow, an infinite result 


denotes the Overflow exception. This occurs when the 
exponent of the rounded result is too large for the 
format of the destination. 


denotes the Underflow exception. This occurs either 
when U is unmasked and a non-zero result (rounded as 
though its exponent were unbound) would be too small 
for the format of the destination or when U is masked 
and such a result (rounded to the destination format) is 
also inexact. 


denotes the Precision exception. This occurs when the 
exact mathematical result did not fit in the result 
format (the result is rounded). 


Effect of Instruction 
This column contains a concise definition of the operation performed 
by each instruction. 


ASM386 Floating-Point Instructions 


Oo 


Oo 


*) 


Opcode 
(Hex) 


D9 FO 
D9 E1 
DE C1 


D8 CO+i 
DC CO+i 
D8 /0 
DC /O 
DE Co+i 


DF /4 
DF /6 


Dg EO 
9B DB E2 


D8 D1 
D8 DO+i 
D8 /2 
DC /2 
Ds D9 
Ds D8+i 
D8 /3 
DC /3 
DE D9 


D9 FF 
D9 F6 


DE F9 
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Floating-Point 
Instruction 


F2XM1 
FABS 
FADD 


FADD ST,ST(/) 
FADD ST(/),ST 
FADD m32r 
FADD m64r 
FADDP ST(/,ST 


FBLD m80d 
FBSTP m80d 


FCHS 
FCLEX 


FCOM 

FCOM ST(/) 
FCOM m32r 
FCOM m64r 
FCOMP 
FCOMP ST(/) 
FCOMP m32r 
FCOMP m64r 
FCOMPP 


FCOS 
FDECSTP 


FDIV 


Excp. Numerics 
Code Exceptions 


1CH 
01H 
05H 


05H 
05H 
05H 
05H 
05H 


1$,1,D,U,P 
IS 
1$,1,D,0,U,P 


1S,1,D,0,U,P 
IS,1,D,0,U,P 
1S,1,D,0,U,P 
1S,1,D,0,U,P 
1S,1,D,0,U,P 


IS 


1S,1,P 
IS 


1$,1,D 
1S,1,D 
ISD 
1S,1,D 
1S,1,D 
IS,1,D 
1$,1,D 
1S,1,D 
1S,1,D 


1S,1,D,U,P 


1$,1,D,Z,0,U,P 


Effect of 
instruction 


ST:= 2-4 

ST := |ST| 

ST(1) := ST(1) + ST, 
pop old ST 

ST := ST + ST(/ 

ST(f) := ST@ + ST 

ST := ST + m32r 

ST := ST + m64r 

ST() := ST() + ST, © 
pop 

Push, ST : = m80d 
m80d := ST, pop 

ST := -ST 

Clear exceptions after 
check for pending 
unmasked numerics 
errors 

Compare ST with ST(1) 
Compare ST with ST(/) 
Compare ST with m32r 
Compare ST with m64r 
Compare ST with 
ST(1), pop 

Compare ST with ST(i), 
pop 

Compare ST with 
m32r, pop 

Compare ST with 
mé64r, pop 

Compare ST with 
ST(1), pop twice 

ST := cos(ST) 
Decrement stack_top 
pointer 

ST(1) := ST(1) / ST, 
pop old ST 


Opcode Floating-Point Excp. Numerics Effect of 

(Hex) Instruction Code Exceptions Instruction 

DCF8+i  FDIV ST(i),ST 09H —=_1S,1,D,Z,0,U,P ST() := ST() / ST 

D8FO+/  FDIVST,ST(/) 09H =='1S,I,D,Z,0,U.P ST:= ST/ST) 

D8 /6 FDIV m32r O9H 1S,1,D,Z,0,U,P  ST:= ST /m32r 

DC /6 FDIV m64r O9H_ = 1S,1,D,Z,0,U,P  ST:= ST /mé64r 

DEF8+i FDIVP ST(i),ST OSH 1S,1,D,Z,0,U,P  -ST() := ST / ST, 
pop 

DE F1 FDIVR OAH 18,1,D,Z,0,U,P  ST(1) := ST / ST(1), 
pop old ST 

DC FO+i FDIVR ST(i),ST OAH  18,1,D,2,0,U,P = ST{) := ST / ST) 

D8F8+i FDIVR ST,ST(A OAH 1S,,D,Z,0,U,P  ST:= ST) /ST 

D8 /7 FDIVR m32r 9AH_ = 1S,1,D,Z,0,U,P_ = ST := m32r / ST 

DC /7 FDIVR m64r OAH 1S,1,D,Z,0,U,P ST := m64r / ST 

DEFO+i FDIVRP ST(j),ST OAH = 1S,1,D,Z,0,U,P_ ST) := ST / ST(A, 
pop 

DDCO+/ FFREE ST(/) - Empty ST(/) 

DE /0 FIADD m16j 05H —‘1S,I,D,0,U,P ST := ST + m16j 

DA /0 FIADD m32j 05H —_‘1S,1,D,0,U,P ST := ST + m32j 

DE /2 FICOM m16j 03H _ ~=—'IS,I,D Compare ST with m16j 

DA /2 FICOM m32j 03H ~=—'IS,1,D Compare ST with m32/ 

DE /3 FICOMP m16j 03H ~ ~=—‘IS,I,D Compare ST with m16j, 
pop 

DA /3 FICOMP m32j 03H _~—=—IS,I,D Compare ST with m32j, 
pop 

DE /6 FIDIV m16j 09H __—_—‘'IS,1,D,Z,U,P ST := ST / m16j 

DA /6 FIDIV m32j 09H _ —_‘IS,1,D,Z,U,P. ST := ST / m32j 

DE /7 FIDIVR m16j OAH = 1S,1,D,Z,0,U,P_ = ST := m16j / ST 

DA /7 FIDIVR m32j OAH _ 1S,1,D,Z,0,U,P ST := m32j / ST 

DF /0 FILD m16j 10H =IS Push, ST := m16/ 

DB /0 FILD m32j 10H IS Push, ST := m32j 

DF /5 FILD m64j 10H =IS Push, ST := m64/ 

DE /1 FIMUL m16j 08H —IS,I,D,0,U,P ST := ST * m16j 

DA /1 FIMUL m32j 08H —_1S,I,D,0,U,P ST := ST * m32j 

D9 F7 FINCSTP _ Increment stack_top 
pointer 
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Opcode 
(Hex) 


9B DB E3 


DF /2 
DB /2 
DF /3 
DB /3 
DF /7 
DE /4 
DA /4 
DE /5 
DA /5 
D9 Co+i 
Dg /G 
DD /0 
DB /5 
DS E8 
D9 /5 
D9 /4 


D9 EA 
D9 E9 
D9 EC 
Dg ED 
D9 EB 
D9 EE 
DE C9 


D8 C8+i 
DC C8+i 
D8 /1 
DC /1 
DE C8+i 


Floating-Point 
Instruction 


FINIT 


FIST m16j 
FIST m32/ 
FISTP m16j 
FISTP m32j 
FISTP m64j 
FISUB m16j 
FISUB m32j 
FISUBR m16j 
FISUBR m32j 
FLD ST(/ 
FLD m32r 
FLD m64r 
FLD méor 
FLD1 

FLDCW m2by 
FLDENV m14/28by 


FLDL2E 
FLDL2T 
FLDLG2 
FLDLN2 
FLDPI 
FLDZ 
FMUL 


FMUL ST,ST(/) 
FMUL ST(/),ST 
FMUL m32r 
FMUL m64r 
FMULP ST(/),ST 
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Numerics 
Exceptions 


IS,1,U,P 
1S,1,U,P 
1$,1,U,P 
1S,1,U,P 
1S,1,U,P 
18,1,D,0,U,P 
1$,1,D,0,U,P 
1§,1,0,0,U,P 
18,1,0,0,U,P 
1s . 
1S,1,D 

1S,1,D 

1S 

IS 


IS 
IS 
IS 
Is 
IS 
IS 
1S,1,D,0,U,P 


1$,1,D,0,U,P 
1$,1,D,0,U,P 
1S,1,D,0,U,P 
1S,1,D,0,U,P 
1$,1,D,0,U,P 


Effect of 
Instruction 


Initialize 80387 after 
check for pending 
unmasked numerics 
errors 


m16j := ST 

m32j := ST 

m16j := ST, pop 
m32j := ST, pop 
m64j := ST, pop 
ST := ST-m16j 
ST := ST -m32j 
ST := m16j - ST 
ST := m32j - ST 


Push, ST := old ST(/) 
Push, ST := m32r 
Push, ST := m64r 
Push, ST := m80r 
Push, ST := +1.0 
Control_word := m2by 
Environment := m74by 
or m28by 

Push, ST := log, (e) 
Push, ST := log, (10) 
Push, ST := log, , (2) 
Push, ST := log, (2) 
Push, ST := 2 

Push, ST := +0.0 
ST(1) := ST(1) * ST, 
pop old ST 

ST := ST* ST() 
ST() := ST() * ST 
ST := ST * m32r 

ST := ST * m64r 
ST(f) := ST(Q * ST, 
pop 
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Opcode _ Floating-Point Excp. Numerics Effect of 


(Hex) Instruction Code Exceptions Instruction 
DB E2 FNCLEX: - Clear exceptions 
without check for #) 
numerics errors 
DB E3 FNINIT - Initialize 80387 without 
: ; check for numerics 
: errors 
Dg DO FNOP - No operation 
DD /6 FNSAVE m94/108by .-- m94/108by := 


‘machine_state without 
check for numerics 
errors 

Dg /7 FNSTCW m2by a me2by := control_word 
without check for 
numerics errors 

D9 /6 FNSTENV m14/28by -- m14/28by := ; 
environment without’ 
check for numerics ~ 


: : errors . a) 
DF Fo FNSTSW AX - AX := status_word . 
ee . without check for . 
: numerics errors 
DD /7 FNSTSW m2by - maby := status_word 
without check for 
; s numerics errors 
D9 F3 FPATAN . 20H —=‘1S,1,D,0,U,P ST(1) :=.arctan(ST(1) 


: / / ST), pop old ST 
D9 F8 FPREM 21H = ‘IS,I,D,U ST := remainder(__ 
integer_chop (ST / 
ae ST(1))) 
D9 F5 FPREM1 24H ~=—IS,1,D,U ST := remainder( 
7 integer_round(ST / 
| sT(1))) 
D9 F2 FPTAN ’ 14FH = 1S,1,D,U,P Y /X:= tan(ST), ST := 
; Y, push, ST := X ' oO 
D9 FC FRNDINT 22H _ ~—sIS|I,P ST := round(ST) 
DD /4: FRSTOR m94/108by -— Machine_state := 
m94by or m108by 
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Opcode _ Floating-Point Excp. Numerics 
(Hex) Instruction Code Exceptions 


9B DD /6 FSAVEm94/108by — 


D9 FD FSCALE 1AH — 1S,1,D,0,U,P 
D9 FE FSIN 26H__IS,I,D,U,P 
D9 FB FSINCOS 25H —_1S,I,D,U,P 
D9 FA FSQRT OCH IS\I,D,U,P 
DD Do+i FST ST(i) OFH_ IS 

D9 /2 FST m32r OFH _1S,1,0,U,P 
DD /2 FST me4r OFH —1$,1,0,U,P 
DD D8s+i FSTP ST(/) OFH IS 

D9 /3 FSTP m32r OFH —_1S,1,0,U,P 
DD /3 FSTP m64r OFH —IS|1,0,U,P 
DB /7 FSTP msor OFH IS 


9BD9/7 FSTCWm2by a 


9BD9/6 FSTENVm14/28by - 


9BDFFO FSTSW AX -- 


9B DD /7 FSTSW m2by - 


DE E9 FSUB 06H —_‘IS,1,D,0,U,P 


ASM386 Floating-Point Instructions 


Effect of 
Instruction 


m94/108by := 
machine_state after 
check for pending 
unmasked numerics 
errors 

SrSre gy 


ST := sin(ST) 

ST := sin(ST), push, 
ST := cos(ST) 

ST := square_root(ST) 
ST() := ST 

m32r := ST 

mé64r := ST 


ST(/) := ST, pop 
m32r:= ST, pop 
m64r := ST, pop 

m80r := ST, pop 
m2by := control_word 
after check for pending 
unmasked numerics 
errors 

m14/28by := 
environment after 
check for pending 
unmasked numerics 
errors 

AX := status_word 
after check for pending 
unmasked numerics 
errors 

maby := status_word 
after check for pending 
unmasked numerics 
errors 

ST(1) := ST(1) - ST, 
pop 
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Opcode 
(Hex) 


DC E8+i 
D8 E0+i 
Ds /4 
DC /4 
DE E8+i 
DE E1 


DC E0+/ 
D8 E8+/ 
D8 /5 
DC /5 
DE E0+i 
D9 E4 
DD E1 
DD E0+i 
DD E9 


DD E8+/ 
DAE9 
9B 

DQ E5 
D9 C9 
D9 C8+/ 
D9 F4 
D9 F1 


D9 F9 
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Floating-Point 
Instruction 


FSUB ST(/),ST 
FSUB ST,ST(A 
FSUB m32r 
FSUB m64r 
FSUBP ST(/),ST 
FSUBR 


FSUBR ST(j),ST 
FSUBR ST,ST(/) 
FSUBR m32r 
FSUBR m64r 
FSUBRP ST(/),ST 
FTST 

FUCOM 

FUCOM ST(i) 
FUCOMP 


FUCOMP ST(/) 
FUCOMPP 
FWAIT 

FXAM 

FXCH 

FXCH ST() 
FXTRACT 
FYL2X 


FYL2XP1 


1DH 


1EH 


Numerics 
Exceptions 


1S,1,D,0,U,P 
1S,1,D,0,U,P 
1S,1,D,0,U,P 
1S,1,D,0,U,P 
1S,1,D,0,U,P 
1S,1,D,0,U,P 


1S,1,D,0,U,P 
1S,1,D,0,U,P 
1S,1,D,0,U,P 
1S,1,D,0,U,P 
1S,1,D,0,U,P 
1S,1,D 
1$,1,D 
1S,1,D 
1S,1,D 


1S,1,D 


I$,1,D 


IS 

Is 

1S,1,D,Z 
1S,1,D,Z,0,U,P 


1S,1,D,U,P 
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Effect of 
Instruction 


ST() := ST@ - ST 


ST := ST-ST(/) 
ST := ST -m32r 
ST := ST - m64r 


ST() := ST@ - ST, pop 
ST(1) := ST - ST(1), 
pop 

ST() := ST-ST() 


ST := ST() - ST 
ST := m32r - ST 
ST := m64r - ST 


ST() := ST - ST(), pop 
Compare ST to +0.0 
Compare ST with ST(1) 
Compare ST with ST(/) 
Compare ST with 
ST(1), pop 

Compare ST with ST(/), 
pop 

Compare ST with 
ST(1), pop twice 
Alternate of WAIT 
Status_word 

condition bits := 
classification of ST 
Exchange ST and 
ST(1) 

Exchange ST and ST(/) 
Push, ST(1) := 
ST_exponent_field, ST 
:= ST_significand 
ST(1) := ST(1) * 

log, (ST), pop old ST 
ST(1) := ST(1) * 

log, (ST + 1), pop old 
ST 


* 


oO 


Appendix F 
80387 Support Library Summary 


oO This appendix is a quick reference for the Decimal Conversion, 
Common Elementary Function, and Exception Handling routines. 


F.1 Parameters and Results for DC387 Routines 


Parameters to the DC387 routines must be pushed onto the 80386 
stack. Each pointer is a 6-byte far (16-bit segment, 32-bit offset) or 
a 4-byte near (32-bit offset) pointer; the segment part of a far pointer 
must be pushed as a 4-byte quantity because DC387 uses a 32-bit 
wide stack. Any push of a segment register in a USE32 segment 
automatically pushes 4 bytes. DC387 routines return the status of the 
conversion to AL and return results to the locations specified by their 
parameters. They pop their input parameters from the stack before 
transferring control back to the caller. 


) The following summarizes each DC387 routine with its pointer 
parameters and results: 


¢ maqcBIN_DECLOW converts a binary number to a decimal string. 
Its single input parameter, ADCB_PTR, accesses a 17-byte ADCB 
block with the following fields: 


B BUF _PTR (6 bytes) To the binary input buffer’s value 
PRSCN (byte) Code values specifying input format: 
0 for single format 
2 for double format 


3 for extended format 

LNGTH (byte) Ordinal specifying length in bytes (digits) 
of output field at D_ BUF_PTR 

D_BUF PTR (6 bytes) To the decimal output buffer with implicit 
decimal point after rightmost ASCII digit 

oO SCALE (2 bytes) Two’s complement integer value of 

output'’s true base, , exponent 

SIGN (byte) ASCIl for +,—, or special input values: 


- for NaN, + for +o,— for—«, 0 for +0, 
and— for—0 


mqcDEC_BIN converts a decimal string to a binary number. Its 
single input parameter, DCB_PTR, accesses a 14-byte DCB block 
with the following fields: 


B_BUF_PTR (6 bytes) To the binary output buffer 
PRSCN (byte) Code values specifying output format: 
0 for single format 
2 for double format 
: ; 3 for extended format 
LNGTH (byte) Ordinal specifying number of input 
characters to be read at D_ BUF_PTR 
D_BUF_PTR (6 bytes) To the decimal input buffer with string of 


ASCII characters 


mqcDECLOW_BIN converts a decimal string to a binary value. 
Its single input parameter, ADCB_PTR, accesses a 17-byte ADCB 
block with the following fields: 


B_BUF_PTR (6 bytes) To the binary output buffer 
PRSCN (byte) Code values specifying output format: 
0 for single format 
2 for double format 
3 for extended format 
LNGTH (byte) Ordinal specifying number of input digits 
to be read at D_ BUF_PTR 
D_BUF_PTR (6 bytes) To the decimal input buffer with implicit 
decimal point after rightmost ASCII digit 
SCALE (2 bytes) Two's complement integer value of input 
string’s true base, , exponent 
SIGN (byte) ASCIl for + or - 


mqcDUBL_XTND converts a binary number from 64-bit double 
format to 80-bit extended format. Its input parameters are the 
following: 


DUBL_PTR To the binary input value 
XTND_PTR To the binary output value 
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¢ maqcSNGL_XTND converts a binary number from 32-bit single 
format to 80-bit extended format. Its input parameters are the 


following: 
SNGL_PTR To the binary input value 
XTND_PTR To the binary output value 


¢ mgqcXTND_DUBL converts a binary number from 80-bit 
extended format to 64-bit double format. Its input parameters are 
the following: 


XTND_PTR To the binary input value 
DUBL_PTR To the binary output value 


¢ mqcXTND_SNGL converts a binary number from 80-bit 
extended format to 32-bit single format. Its input parameters are 
the following: 


XTND_PTR To the binary input value 
SNGL_PTR To the binary output value 


F.2 Arguments and Results for CL387 Functions 


Most arguments to the CL387 functions must be pushed onto the 
80387 stack; these are floating-point values. The other argments to 
the CL387 functions are integer values that must be loaded into 
particular 80386 registers or pushed onto the 80386 stack. 


Most CL387 functions return floating-point results to the 80387 stack. 
The CL387 real-to-integer conversion functions return results in 
certain 80386 registers. 


Table F-1 summarizes the arguments, results, and operation of each 
CL387 real function in 80387 stack position notation. 
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Table F-1 Summary of CL387 Real Function Arguments and Results 


Name 


mqerACS 
mqaerASN 
mqaqerATN 
mqerCOS 
mqaerCSH 
maerDIM 
maerEXP 
mqerlA2 
maerlA4 
mqaerlA8 
maerlAX 
maerlC2 
mqaerlC4 
mqaerlC8 
mqaerlCX 
mqaerlE2 
maerlE4 
mqerlE8 
mqaerlEX 
mqgerLGD 
mqaerLGE 
maqerMAX 
mqaqerMIN 
maqerMOD 
mgqerRMD 
mqaerSGN 
maerSIN 
maqerSNH 
mqaerTAN 
mqgerTNH 
mqaerY2X 
mqerY12 
maerYl4 
mqerYI8 
maerYIS 
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Results and Arguments 


ST := Arccos(ST) 

ST := Arcsin(ST) 

ST := Arctan(ST) 

ST := cos(ST) 

ST := cosh(ST) 

ST := max(ST(1)-ST, +0) 
ST:= 

AX := roundaway(ST) 
EAX := roundaway(ST) 
EDX_EAX: =roundaway(ST) 
ST := roundaway(ST) 
AX := chop(ST) 

EAX := chop(ST) 
EDX_EAX := chop(ST) 
ST := chop(ST) 

AX := roundeven(ST) 
EAX := roundeven(ST) 
EDX_EAX: =roundeven(ST) 
ST := roundeven(ST) 
ST := log,, (ST) 

ST := In(ST) 

ST := max(ST(1),ST) 

ST := min(ST(1),ST) 
ST := (ST(1) mod ST) 
ST := (ST(1) rem ST) 


i] 


ST := ST(1), ST’s sign 
ST := sin(ST) 

ST := sinh(ST) 

ST := tan(ST) 

ST := tanh(ST) 

ST := ST(1)" 

ST:= sT™ 

ST := STFAX 

ST = STEDXLEAX 


St: = gTideord ptr SS:ESP) 


Operation 


Arc cosine 
Arc sine 
Arc tangent 
cosine 
hyperbolic cosine 
positive difference 
exponential 
to word integer 

to short integer 
to long integer 
to nearest integer 
to word integer 
to short integer 
to long integer 
to nearest integer 
to word integer 
to short integer 
to long integer 
to nearest integer 
common logarithm 
natural logarithm 
maximum 
minimum 
modulus with sign of ST(1) 
IEEE remainder 
x with sign of y 
sine 
hyperbolic sine 
tangent 

hyperbolic tangent 
y to real or integer power 
y to word integer power 
y to short integer power 
y to long integer power 
y to short integer power 
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Table F-2 summarizes the arguments, results and operation of each 
CL387 complex function in 80387 stack position notation. 


Table F-2 Summary of CL387 Complex Function Arguments and Results 


Name Results and Arguments Operation 

mqerCABS = | (ST,ST(1)) | magnitude 

mqerCACH (ST,ST(1)): =Arccosh(ST,ST(1)) hyperbolic Arc 
cosine 

maerCACS (ST,ST(1)):=Arccos(ST,ST(1)) Arc cosine 

maqerCASH (ST,ST(1)):=Arcsinh(ST,ST(1)) hyperbolic Arc sine 
mqaerCASN (ST,ST(1)):=Arcsin(ST,ST(1)) Arc sine 

mqerCATH (ST,ST(1)):=Arctanh(ST,ST(1)) - hyperbolic Arc tangent 
mqaerCATN (ST,ST(1)): =Arctan(ST,ST(1)) ere tangent 
mgerCC2C —(ST,ST(1)):=(ST(2),ST(3))"STS™ sw? 

mgerCC2R —_(ST,ST(1)):=(ST(1),ST(2))" z* 

mqerCCl2 (ST,ST(1)):=(ST,ST(1))** z 4 ( = word integer) 
mqerCCl4 (ST,ST(1)):=(ST,ST(4) FAX z J @ = short integer) 
maerCCl8 (ST,ST(1)):=(ST,ST(1)FOX-FAX zj ve long integer) 
mqaerCCls (ST,ST(1)):=(ST,ST(1))°#ord PEP SSEESP) 7 J G — short integer) 
mgerCCOS (ST,ST(1)):=cos(ST,ST(1)) cosine 

mqerCCSH (ST,ST(1)):=cosh(ST,ST(1)) hyperbolic cosine 
mgerCDIV (ST,ST(1)):=(ST(2),ST(3)/ST,ST(1)) division 

mgerCEXP —(ST,ST(1)):=e°ST+ST1) exponential 
mqaerCEXP (ST,ST(1)):=Ln(ST,ST(1)) natural logarithm 
maqerCMUL (ST,ST(1)):=(ST(2),ST(3)*ST,ST(1)) multiplication 
maqerCPOL (ST,ST(1)): = (| ST,ST(1) | Arctan(ST,ST(1)) polar conversion 
mqaerCPRJ (ST,ST(1)): = €@,0 with sign(ST(1)) infinite projection 
mgerCR2C —(ST,ST(1)):=ST(2)¢ST-STC1)) x? 

maqerCREC (ST,ST(1)):= (ST*eos(ST(1)),ST*sin(ST(1))) rectangular conversion 
mqaerCSIN (ST,ST(1)):=sin(ST,ST(1)) sine 

maqerCSNH (ST,ST(1)):=sinh(ST,ST(1)) hyperbolic sine 
mqerCSQR (ST,ST(1)):=sqrt(ST,ST(1)) square root 
mqaerCTAN (ST,ST(1)): =tan(ST,ST(1)) tangent 

mgerCTNH (ST,ST(1)):=tanh(ST,ST(1)) hyperbolic tangent 
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F.3 Parameters and Results for EH387 Routines 


F6 


Parameters to the EH387 routines must be pushed onto the 80386 
stack; they must be aligned on 4-byte boundaries and padded in the 
high-order bytes as needed. 


The EH387 DECODE routine returns its results to the ESTATE387 
data structure. The ENCODE routine accesses this structure to restore 
the 80387 machine state before returning control to the exception 
handler. Both EH387 routines pop their input parameters from the 
stack on return to the caller. 


This section summarizes the EH387 routines with their parameters. 
Pointer parameters are a 6-byte far (16-bit segment, 32-bit offset) or 
a 4-byte near (32-bit offset) pointer. A summary of the ESTATE387 
data structure follows this summary of the EH387 routines: 


DECODE fills ESTATE387 with information about the interrupted 
operation, its arguments or results, and the 80387 machine state 
when the interrupt occurred. It has two parameters: 


ESTATE387_PTR To ESTATE387 allocated on the stack or 
in memory 
XCPTNS387 Uncleared 80387 Status Word from 


interrupted operation 


ENCODE accesses ESTATE387, and either retries the operation or 
restores the 80387 machine state, depending on the value of 
RETRY_FLAG set by the exception handler. It has four 
parameters: 


ESTATE387_PTR To ESTATE387 allocated on the stack or 
in memory 

XCPTNS387 Uncleared 80387 Status Word from 
interrupted operation 

RETRY_CONTROL 80387 Control Word, supplied by handler, 
for an ENCODE retry of interrupted 
operation 

RETRY FLAG Boolean byte, supplied by handler; set to 


call ENCODE for retry attempt, cleared to 
call ENCODE to restore 80387 and exit to 
handler 
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e ESTATE387 has the following fields: 


OPERATION (2 bytes) 


ARGUMENT (byte) 


ARG1(5) (5 words) 
ARG1_FULL (byte) 
ARG2(5) (5 words) 
ARG2_FULL (byte) 
RESULT (byte) 


RES1(5) (5 words) 
RES1_FULL (byte) 
RES2(5) (5 words) 
RES2_FULL (byte) 
FORMAT (byte) 


REGISTER (byte) 


SAVE387 (108 bytes) 
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Exception opcode of interrupted 
operation 
Boolean bits set for CL387 complex 
operation (bit 7) and argument pushed on 
80387 stack (bit 3); also has two bit fields 
specifying 80387 format of arguments 
with codes: 

0 - no operand 

1 - ST (80387 stack top) 

2-ST(1) 

3 - ST(i) where i in REGISTER 

4 - (see FORMAT) 

5 - extended format 

6 - long integer 

7 - BCD integer 
Array (80 bits) for first argument 
Boolean set if ARG1 has defined value 
Array (80 bits) for second argument 
Boolean set if ARG2 has defined value 
Boolean bits set for pop stack twice (bit 
7) or pop stack once (bit 3); also has two 
bit fields specifying 80387 format of 
results as for ARGUMENT 
Array (80 bits) for first result 
Boolean set if RES1 has defined value 
Array (80 bits) for second result 
Boolean set if RES2 has defined value 
Specifies 80387 format when ARGUMENT 
or RESULT field has code 3 with: 

0 - single format 

1 - short integer 

2 - double format 

3 - word integer 
Specifies 80387 stack position when 
ARGUMENT or RESULT field has code 4 
Storage for 80387 machine state, a 32-bit 
80387 Environment followed by 80387 
stack 
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F.4 80387 Exceptions and Exception Opcodes 


The EH387 routines do not incur exceptions. However, a reentrant 
trap handler can call ENCODE to retry operations that continue to 
generate exceptions. Table F-3 summarizes possible exceptions for 
the DC387 and CL387 routines. See Appendix E for possible 
exceptions generated by ASM386 floating-point instructions. 


Table F-3 Summary of Possible DC387 and CL387 Exceptions 


Routine 


mqcBIN_DECLOW 
mqcDEC_BIN 
mqcDECLOW_BIN 
mqcDUBL_XTND 
mqcSNGL_XTND 
mqcXTND_DUBL 
mqcXTND_SNGL 
maerACS 
mqerASN 
maerATN 
mqerCOS 
mqgerCSH 
mqaerDIM 
mqaqerEXP 
mqaerlA2/4/8/X 
mgerlC2/4/8/X 
mqerlE2/4/8/X 
mqerLGD 
maqerLGE 
maqerMAX 
mqaerMIN 
mqerMOD 
maqerRMD 
mqerSGN 
mqerSIN 
maerSNH 
maerTAN 
mqerTNH 


Exceptions 


1,D,P 
O,U,P 
0,U,P 
D 


Routine 


mqaerY2X 
mqaerY12/4/8/S 
magerCABS 
mqerCACH 
mgerCACS 
maqerCASH 
mqgerCASN 
mqgerCATH 
maerCATN 
mqgerCC2C 
mqerCC2R 
mqaerCCl2/4/8/S 
mgqerCCOS 
mgerCCSH 
mgerCDIV 
maqerCEXP 
mqerCLGE 
mgerCMUL 
mqerCPOL 
maerCPRJ 
mgerCR2C 
mqerCREC 
mgerCSIN 
mgqerCSNH 
mgerCSQR 
maerCTAN 
mgerCTNH 
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Exceptions 


1,D,Z,0,U 
1,D,Z,0,U 
1,D,0,U,P 
1,D,0,U 
1,D,0,U 
1,D,0,U 
1,D,0,U 
1,D,0,U 
1,D,0,U 
1,D,Z,0,U 
1,D,Z,0,U 
1,D,Z,0,U 
1,D,0,U 
1,0,0,U 
1,D,Z,0,U 
1,D,0,U 
1,D,Z 
1,D,0,U 
1,D,0,U 

| (IS only) 
1,D,Z,0,U 
1,D,U 
1,D,0,U 
1,D,0,U 
1,D 
1,D,0,U 
1,D,0,U 


oO 


* 


oO 


Each Decimal Conversion and Common Elementary Function routine 
listed in Table F-3 has an exception opcode. 


If 80387 exceptions are unmasked and one of the DC387 or CL387 
routines generates a trap, its exception opcode fills one of the 
following fields: 


e Opcode in the 80387 Environment part of the machine state stored 
by the FSAVE/FNSAVE instructions 


e OPERATION in the ESTATE387 structure after a call to the 
EH387 DECODE routine 


Table F-4 lists the hexadecimal exception opcodes for the Decimal 
Conversion and Common Elementary Function routines in numeric 
order. 
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Code 


DOH 

DOH 

D1H 

D2H 

D3H 

D4H 

D5H 
166H 
167H 
168H 
16BH 
16CH 
16DH 
16EH 
16FH 
170H 
171H 
172H 
173H 
174H 
175H 
176H 
178H 
179H 
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Table F-4 DC387 and CL387 Exception Opcodes 


Routine Code 


mqcDEC_BIN 17BH 
mqcDECLOW BIN 17EH 
mqcBIN_DECLOW 17FH 
mqcSNGL_XTND  180H 
mqcXTND_SNGL 184H 
mqcDUBL_XTND 185H 
mqcXTND DUBL 186H 


mqaerlCX 264H 
maerlAX 265H 
mqaerlA4 269H 
mqaqerEXP 26AH 
mqaerLGE 27AH 
mqerLGD 27CH 
mqaqerSNH 27CH 
mgerCSH 27CH 
maerTNH 27CH 
mqerSiN 281H 
mqerCOS 282H 
maerTAN 283H 
maerASN 396H 
mqerACS 397H 
mqaerATN 398H 
maerlEX 399H 
mqaerlC4 


The EH387 DECODE routine also returns exception opcodes for most 
ASM386 floating-point instructions to the OPERATION field of the 


Routine 


mqaerlE4 
maerlA2 
mqaerlC2 
maerlE2 
mqaeriC8 
mqaerlA8 
mgerlE8 
maqerSGN 
mqaerDIM 
mgerMOD 
mqaerY2X 
maqerRMD 
maerYl2 
maerYl4 
mgerYl8 
maerYIS 
mqaerMIN 
maerMAX 
mqaerCABS 
mgerCSQR 
mqaqerCLGE 
maqerCEXP 
mgerCSIN 


Code 


39AH 
39BH 
39CH 
39DH 
39EH 
39FH 
3A0H 
3A1H 
3A2H 
3A3H 
3A4H 
3A7H 
3A8H 
3A9H 
58CH 
58DH 
58EH 
591H 
592H 
595H 
595H 
595H 
595H 


Routine 


maerCSNH 
mqerCCOS 
mqerCCSH 
maerCTAN 
mqaerCTNH 
maerCASN 
maerCASH 
mqaerCACS 
mqerCACH 
mqerCATN 
magerCATH 
mqaerCPRJ 

maqerCPOL 
magerCREC 
mgerCMUL 
mgerCDIV 

mgerCC2C 
mgerCR2C 
mgerCC2R 
mqerCCl2 

maerCCl4 

mqgerCCl8 

mgerCClS 


ESTATE387 structure. See Appendix E for these codes. 
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Glossary 


This glossary defines many terms that have precise technical meanings 
as specified in the ANSI/JEEE Std 754-1985 JEEE Standard for 
Binary Floating-Point Arithmetic or as specified in this manual. Such 
terms are italicized in this glossary. You may therefore interpret any 
italicized terms or phrases as cross-references. 


Base: (1) a term used in logarithms and exponentials. In both 
contexts, it is a number that is being raised to a power. The 
equations y = log,(x) and bY = x where b is the base are equivalent. 


Base: (2) a number that defines the representation being used for a 
string of digits. Base 2 is the binary representation; base 10 is the 
decimal representation; base 16 is the hexadecimal representation. In 
each case, the base is the factor of increased significance for each 
succeeding digit to the left. 


Bias: a constant that is added to the true exponent of a real number 
to obtain the value in the exponent field of that number’s floating- 
point representation in the 80387. To obtain the true exponent, 
subtract the bias from the field’s value. For example, the single real 
format has a bias of 127 whenever the given exponent is nonzero. If 
the 8-bit exponent field contains 1000 0011 (131), the true exponent is 
13] - 127 = +4. 


Biased Exponent: the exponent as it appears in a floating-point 
representation of a real number. The biased exponent is interpreted as 
a nonnegative number. 


Binary Coded Decimal: a method of storing numbers that retains a 
base,, representation. Each decimal digit occupies 4 full bits (one 
hexadecimal digit). The hexadecimal values A through F (1010 
through 1111) are not used. The 80387 supports a packed decimal 
format that consists of 9 bytes of binary coded decimal (18 decimal 
digits, each in the range 0..9) and one byte for the sign. 


Binary Point: an entity just like a decimal point, except that it exists 
in binary numbers. Each binary digit to the left of the binary point is 
multiplied by an increasing power of two, beginning with 2°. Each 
binary digit to the right of the binary point is multiplied by an 
increasing negative power of two, beginning with gr. 


Branch: a complex function which is analytic in some domain and 
which takes on one of the values of a multiple-valued function in that 
domain. 


Branch Cut: a line or curve of singular points used in defining a OQ 
branch of a multiple-valued complex function. 


C,..Cy: the four condition bits of the 80387 status word. These bits 
are set to certain values by some 80387 instructions and by certain 
CL387 and DC387 routines. 


Characteristic: a synonym for the exponent field of a floating-point 
number. 


Chop: to set one or more low-order bits of a number to zero, 
yielding the nearest representable number in the direction of zero. 


CL387: the 80387 Common Elementary Function Library. 
Complex Function: a function that operates on complex number(s). 


Complex Number: a number that can be represented algebraically as a) 
z= x + iy where x and y are real numbers and i@=-1. A complex 
number can also be represented in rectangular or polar form. 


DC387: the 80387 Decimal Conversion Library. 


Denormal: a special form of floating-point number. On the 80387, a 
denormal is defined as a number that has a biased exponent of zero. 
By allowing a significand with leading zeros, the range of possible 
negative exponents can be extended by the number of bits in the 
significand. However, each leading zero is a bit of lost accuracy so 
this extended exponent range is obtained by reducing precision. 


Double Extended: the Standard’s term for the 80387’s extended 
format. It consists of a sign, a 15-bit exponent biased by +16383, and 
an explicit integer bit in the 64-bit significand—a total of 80 explicit 


bits. oO 


Double Format: a floating-point format supported by the 80387 that 
consists of a sign, an 11-bit exponent biased by +1023, and an implicit 
integer bit in the 52-bit significand—a total of 64 explicit bits. 
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EH387: the 80387 Exception Handling Library. 


Emulator: a true software emulator performs floating-point 
operations exactly as if an 80387 were present in the system. 
However, the emulator’s execution speed is slower. 


Exception: any of the six conditions (invalid operation, denormal, 
zerodivide, numeric overflow, numeric underflow, and precision) 
detected by the 80387 and signaled by status flags (masked exceptions) 
or by status flags and traps (unmasked exceptions). 


Exponent: (1) any number that indicates the power to which another 
number is raised. 


Exponent: (2) the field of a floating-point number that indicates the 
number’s order of magnitude. This would fall under the general 
definition (1) except that a bias must be subtracted to obtain the 
floating-point number’s true exponent. 


Extended Format: the 80387’s implementation of the Standard’s 
double extended format. Extended format is the main floating-point 
format used by the 80387. It consists of a sign, a 15-bit exponent 
biased by +16383, and a significand with an explicit integer bit and 63 
fraction part bits—a total of 80 bits. 


Far Library: 80387 Support Library modules 80387F.LIB, 
DC387F.LIB, CL387F.LIB, and EH387F.LIB are linked to programs 
located in different 80386 code segments from the segment named 
CODE32. Calls to far library routines assume access via a 6-byte 
effective address represented logically as a 2-byte selector (to the 
segment base address) plus a 4-byte offset from the segment base 
address. 


Floating-Point: of or pertaining to a number that is expressed as a 
base, a sign, a signed exponent, and a significand. The value of the 
number is the signed product of its significand and the base raised to 
the power of the exponent. Floating-point representations are more 
versatile than integer representations in two ways. First, they include 
fractions. Second, their exponent parts allow a much wider range of 
magnitude than possible with fixed-length integer representations. 


Fraction Part: the part of a floating-point significand that lies to the 
right of the binary point. 
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Gradual Underflow: a method of handling the numeric underflow 

exception that minimizes the loss of accuracy in the result. If there is 

a denormal number that represents the correct result, the 80387 

returns that denormal if underflow is masked. Thus, digits are lost 

only to the extent of denormalization. Most computers return zero oO 
when underflow occurs, losing all significant digits. 


Implicit Integer Bit: a part of the significand in the single and 
double real formats that is not explicitly stored. In these formats, 
only the fraction part is stored explicitly. The significand consists of 
the fraction part and an implicit integer bit to the left of the binary 
point that is always 1, except when the biased exponent is 0 (denormal 
with minimum biased exponent). 


Indefinite: a special value that is returned by functions when the 

inputs are such that no sensible answer is possible. For each floating- 

point format there exists one quiet NaN that is designated the 

indefinite value. For each binary integer format, the ae ined 
furthest from zero is considered the indefinite value (-2 

-253), as well as the minimum value. For the 80387 packed hea 

format, the indefinite value contains all 1’s in the uppermost byte 

(sign and next 7 bits). Oo 


Infinity: a value that has greater magnitude than any integer or real 
number. /nfinity can be considered as another number that is subject 
to special 80387 rules of arithmetic. All three Intel floating-point 
formats provide representations for + and —«, 


Integer: a number (positive, negative, or zero) that is finite and has 
no fraction part. Integer can also mean the computer representation 
for such a number: a sequence of data bytes, interpreted in a 
standard way. Integers can be represented in floating-point format; 
this is what the 80387 does whenever an integer is pushed onto its 
stack. 


Integer Bit: a part of the significand in floating-point formats. In 

these formats, the integer bit is the only part of the significand 

considered to be to the left of the binary point. The integer bit is 

usually 1 except when the biased exponent is 0 (denormal with oO 
minimum biased exponent). In the extended format, the integer bit is 
explicit; in the single and double formats the integer bit is implicit 

(not actually stored in memory). 
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Invalid Operation: the exception condition for the 80387 that covers 
all cases not covered by other exceptions. The invalid operation 
exception occurs for 80387 stack faults. It also occurs for certain 
arithmetic operations such as +o + —~, 0/0, ~/o, 0*«, taking the 
square root of a number less than zero, or taking a remainder x REM 
y where x = ~ory=0. 


Long Integer: an integer format supported by the 80387 that consists 
of a 64-bit two’s complement quantity. 


Long Real: a non-Standard synonym for the 80387’s double format. 


Mantissa: a symonym for the fraction part of a floating-point 
number. 


Masked: a term that applies to each of the six 80387 exceptions 
I,D,Z,0,U,P. If an exception is masked, the 80387 will not generate 
an interrupt when the exception condition occurs; it will provide a 
default result and set the exception status bit instead. 


NaN: the Standard abbreviation for "Not a Number." A NaN is a bit 
pattern that does not represent any number, including infinity. The 
80387 distinguishes between a signaling NaN (SNaN) and a quiet NaN 
(QNaN). It signals an invalid operation exception when an SNaN 
appears as the operand to an arithmetic operation or comparison. It 
creates a QNaN indefinite as its masked response to invalid operation 
exceptions. 


Near Library: 80387 Support Library modules 80387N.LIB, 
DC387N.LIB, CL387N.LIB, and EH387N.LIB are linked to programs 
located in the CODE32 code segment; they share a combined 
data/stack segment named DATA. Calls to near library routines 
assume access via a 4-byte offset from the segment base address of 
CODE32. 

Normal: the representation of a number in floating-point format in 
which the significand has an explicit or implicit integer bit equal to 1. 


Normalize: to convert a denormal representation of the number to a 
normal representation. 
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Overflow: an exception condition in which the correct answer is 

finite, but it has magnitude too large to be represented in the 

destination format. This kind of overflow is also called "numeric 

overflow" to distinguish it from 80387 stack overflow, which causes 

the invalid operation exception. ) 


Packed Decimal: an integer format supported by the 80387. A 
packed decimal number is a 10-byte quantity with nine bytes of 18 
binary coded decimal digits and one byte for the sign bit. 


Precision: (1) the effective number of bits in the significand of the 
floating-point representation of a number. 


Precision: (2) an 80387 exception condition that results when a 
calculation does not return an exact answer. This exception is usually 
masked and ignored except by programmers who want to know when 
the least significant bit of any result has been obtained by rounding. 
The Standard calls the precision exception "inexact." 


Pseudodenormal: one of a set of special values in extended format. 

The exponent field has all zeros, while the significand field has an 

explicit integer bit of 1. Pseudodenormals are not created by the a) 
80387; they cause the D exception when encountered by the 80387 

arithmetic instructions or by CL387 functions. 


Pseudoinfinity, Pseudo-NaN, and Pseudozero: see unsupported format 


Quiet NaN (QNaN): a NaN in which the most significant bit of the 
fraction part of the significand is 1. Quiet NaNs as operands do not 
cause invalid operation exceptions except in ordered comparisons. 
They are intended to provide retrospective diagnostic information. 


Real: any finite value (positive, negative, or zero) that can be 
represented by a possibly infinite decimal expansion. Reals can be 
represented as the points of a line marked off as a ruler. The term 
real can also refer to a floating-point number that represents a real 
value. 


*) 
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Riemann Sphere: A sphere whose south pole is tangent to the origin 
on the complex plane. Points on the Riemann sphere map one-to-one 
to points of the finite complex plane under stereographic projection. 
In other words, each point on the sphere except the north pole 
corresponds to the point on the plane at the end of the line segment 
from the north pole through that point on the sphere. The north 
pole’s stereographic projection is the set of all points on the complex 
plane with at least one infinite component. 


Short Integer: an integer format supported by the 80387 that consists 
of a 32-bit two’s complement quantity. Note that short integer is not 
the shortest 80387 integer format—the 16-bit word integer is. 


Short Real: a non-Standard synonym for the 80387’s single format. 


Signaling NaN (SNaN): a NaN that causes an invalid operation 
exception whenever it enters into an arithmetic operation or 
comparison (ordered or unordered). 


Significand: the field of a floating-point number that, when 
multiplied by 2°UeexPonent vields the number’s absolute value. The 
80387 significand is composed of an integer bit and a fraction part. 
The integer bit is implicit in the 80387 single and double formats, but 
explicit in its extended format. The significand has an implicit binary 
point after the integer bit. 


Single Extended: a floating-point format defined by the Standard: it 
provides greater precision than single format, and it has an explicit 
integer bit in the significand. The 80387’s extended format meets the 
Standard’s single extended and double extended requirements. 


Single Format: a floating-point format, supported by the 80387, 
which consists of a sign bit, an 8-bit exponent biased by +127, an 
implicit integer bit, and a 23-bit significand—a total of 32 explicit 
bits. 


Stack Fault: a special case of the invalid operation exception, which 
is indicated by S = | in the 80387 status word. This exception 
condition occurs due to stack overflow (trying to load to a non-empty 
stack element) or stack underflow (trying to pop an empty stack 
element or to use an empty stack element as an operand). 
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Standard: the JEEE Standard for Binary Floating-Point Arithmetic— 
ANSI/IEEE Std 754-1985. 


Status Word: a 16-bit 80387 register that contains condition bits 

C,..Cy, the 80387 stack pointer, busy, interrupt, and stack fault bits, oO 
and the exception byte (exception flags). The status word can be set 

or cleared directly by a program, but it is usually controlled by side 

effects to floating-point instructions. 


Temporary Real (Tempreal): a non-Standard synonym for the 
80387’s 80-bit extended format. 


Transcendental Constant: a number, such as z or e 

(2.71828 182845904523536..) that cannot be represented as the root of 
an algebraic equation—in particular, it cannot be represented exactly 
as any rational number. 


Transcendental Function: one of a class of functions for which 
polynomial formulas are approximations; results are seldom exact for 
more than isolated values. The exponential, logarithmic, 
trigonometric, and hyperbolic functions are transcendental. 


Two’s Complement: a method of representing integers. If the #) 
uppermost bit (sign) is 0, the number is considered positive and the 

rest of the bits represent the number’s value. If the uppermost bit is 

1, the number is negative: its value is obtained by subtracting 

(2Pit_count) from all the bits. For example, the 8-bit number 

11111100 represents -4, obtained by subtracting 2° from 252. 


Trap: an error detected by the 80386 and reported at the instruction 
boundary immediately after the instruction in which an exception was 
detected. 


Trichotomy Law: Any number must be greater than, less than, or 
equal to another number. 


Unbiased Exponent: the value of the exponent field of a floating- 

point number after subtraction of the format’s bias. For example, if a 

single format exponent is 131, subtract the bias +127 to obtain the Oo 
unbiased exponent +4; the real number being represented is 

(significand * 2°), 
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Underflow: an exception condition in which the correct answer is 
nonzero, but the answer has a magnitude too small to be represented 
as a normal number in the destination floating-point format. The 
Standard specifies that an attempt be made to represent the number 
as a denormal, which can result in a loss of precision from the 
significand. This kind of underflow is also called "numeric 
underflow" to distinguish it from stack underflow, which causes the 
80387 invalid operation exception. 


Unmasked: a term that applies to each of the six 80387 exceptions 
1,D,Z,0,U,P. If an exception is unmasked, the 80387 will generate an 
interrupt when the exception condition occurs so that a customized 
interrupt routine (a trap handler) can contro! recovery from the 
exception. 


Unnormal: see unsupported format 


Unsupported Format: any bit pattern that is not recognized by the 
80387. This category includes formats that are recognized by the 
8087 and 80287, namely: pseudo-NaN, pseudozero, pseudoinfinity, 
and unnormal. 


Word Integer: an integer format supported by both the 80386 and 
80387 that consists of a 16-bit two’s complement quantity. 


Zerodivide: an exception condition in which the operands are finite 


but the operation (not necessarily division) correctly produces a result 
of infinite magnitude. 
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Index 


For entries with many page numbers, see the page number in boldface first. 


1POP bit, RESULT byte, 4-8 
2POP bit, RESULT byte, 4-8 
80387 
data formats, D-1 
initialization, 1-3 
instructions, E-1 
80387F.LIB, 1-2, 1-4 
80387N.LIB, 1-2, 1-4 
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Absolute value, complex number, 3-92, 3-96 
Accuracy, decimal-binary conversions, C-1 to C-3 
ADCB structure, 2-3, 2-4, 2-12, 2-20, F-1, F-2 
AL register, 2-5, 2-7, 2-19, 2-33, F-1 

Algebraic representation, complex number, 3-93 
Alternative Decimal Conversion Block, see ADCB 
Angle, polar, 3-93 

Arc cosine, 3-10, 3-13, 3-91, 3-103 

Arc sine, 3-10, 3-15, 3-91, 3-111 

Arc tangent, 3-10, 3-17, 3-91, 3-119 

Arccos, see Arc cosine 

Arccosh, 3-91, 3-99 

Arcsin, see Arc sine 

Arcsinh, 3-91, 3-107 

Arctan, see Arc tangent 

Arctanh, 3-91, 3-115 

ARGI field, ESTATE387, 4-7, 4-11 

ARGI1_ FULL field, ESTATE387, 4-7, 4-11 
ARG2 field, ESTATE387, 4-7, 4-11 
ARG2_FULL field, ESTATE387, 4-7, 4-11 
ARGUMENT byte, ESTATE387, 4-6, 4-11 
ASCII digits, 2-12, 2-16, 2-20 

ASM386 80387 instructions, E-1 

ATYP! and ATYP2 fields, ARGUMENT byte, 4-6 
Augmented Decimal Conversion Block, see ADCB 
AX register, 3-27, 3-35, 3-43, 3-78, 3-129 


B 


Base, logarithm, see Logarithm, common 

Base, logarithm, see Logarithm, natural 

BCD integer, D-1 

Binary-binary conversions, 2-10, 2-24, 2-26, 2-28, 2-31, F-2, F-3 
Binary-decimal conversion, 2-12, F-1 


Cc 


Chop, 3-11, 3-35, 3-37, 3-39, 3-41, 3-59 
Circular representation, see Polar representation 
CL387, 1-1, 4-16, F-3 
PUBLIC symbols, A-2 
CL387F.LIB, 1-2, 3-2, A-1, B-7 
CL387N.LIB, 1-2, 3-2, A-1, B-7 
CMX bit, ARGUMENT byte, 4-6 
CODE32 segment, 1-2, 1-4, 2-2, 3-2, 4-2, 4-11 
Common logarithm, see Logarithm, common 
Complex 
division, 3-92, 3-147 
functions, 3-8, 3-90, 3-96 to 3-186, B-1, F-5 
infinity projection, 3-92 
magnitude, 3-92, 3-93, 3-96 
multiplication, 3-92, 3-158 
numbers, representations, 3-93, 3-161, 3-170 
plane, 3-92 
square root, 3-92, 3-96, 3-179 
Control Word, 80387, 1-3, 2-3, 2-6, 2-9, 3-4, 3-7, 3-23, 4-1, 4-4, 4-1], 
4-18 
Conversions 
binary-binary, 2-10, 2-24, 2-26, 2-28, 2-31, C-1, F-2, F-3 
complex numbers, 3-91, 3-161, 3-170 
decimal-binary, 2-10, 2-12, 2-16, 2-20, C-1, F-1, F-2 
in-and-out, C-2 
real to integer, 3-11, 3-27 to 3-49, F-3 
Cosh, 3-10, 3-21, 3-91, 3-144 
Cosine, 3-10, 3-19, 3-91, 3-141 
CS 
register, 4-12 
selector, 80387 State, 4-12 
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D 


Data formats, 80387, D-1 
DATA segment, 1-2, 2-2, 2-6, 3-2, 3-3, 4-3, 4-11 
© 287, 1 16, Fed 

PUBLIC symbols, A-1 

DC387F.LIB, 1-2, 2-2, A-1, B-1 

DC387N.LIB, 1-2, 2-2, A-1, B-1 
DCB structure, 2-3, 2- 16, F- . 
Decimal Conversion Block, see DCB 
Decimal point, 2-16, 2-20 
Decimal-binary conversions, 2-10, 2-12, 2-16, 2-20, F-1, F-2 
DECODE, 4-1, 4-4, 4-9, 4-13, 4-16, 4-17, 4-18, B-10, C-3, F-6, F-10 
Denormal 

argument, 4-16 

exception, 2-7, 3-5, E-3 
Digits, ASCII, 2-12, 2-16, 2-20 
Division, complex numbers, 3-92, 3-147 
Domain, complex 

Arc cosine, 3-104 

Arc sine, 3-112 

oO Arc tangent, 3-120 

Arccosh, 3-100 

Arcsinh, 3-108 

Arctanh, 3-116 

cosh, 3-100 

cosine, 3-104 

natural logarithm, 3-155 

sine, 3-112 

sinh, 3-108 

tangent, 3-120 

tanh, 3-116 
Double format real, C-1, D-2 
DS register, 1-2, 2-6, 3-3, 4-3, 4-11 


*) 
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EAX register, 2-6, 3-3, 3-29, 3-31, 3-37, 3-39, 3-45, 3-47, 3-81, 3-84, 
3-132, 3-135, 4-3 


EBP register, 2-6, 3-3, 4-3 
EBX register, 2- a6 3-3, 4-3 
ECX register, 2-6, 3-3, 4-3 


EDI register, 2-6, 3-3, 4-3 
EDX register, 2-6, 3-3, 3-31, 3-39, 3-47, 3-84, 3-135, 4-3 
EFLAGS register, 4-10 
EH387, 1-1, F-6 
PUBLIC ‘symbols, Zo 3 
EH387F.LIB, 1-2, 4-2, 4-11, A-1 
EH387N.LIB, 1-2, 4-2, 4-11, A-1, B-8 
EIP 
Offset, 80387 State, 2-9, 3-7, 4-12 
register, 4-12 
ENCODE, 4-1, 4-4, 4-14, 4-18, 4- 
Environment, 80387, 2-8, 3-6, 4-9 
ES register, 1-2, 2-6, 3-3, 4-3, 4-11 
ESI register, 2-6, 3-3, 4-3 
ESP register, 3-3 
ESTATE387 structure, 4-4, 4-5, 4-11, 4-16, 4-18, B-10, F-7 
Exception, 
byte, 80387, 2-5, 2-7, 2-19, 2-33, 3-4, 4-4, 4-16, 4-18 
handler, 3-3, 4-1, 4-10, 4-11, B-8 
opcode, 2-11, 3-12, 3-95, 4-16, E-3, F-10 
status, 80387, 2-8, 3-6 
Exceptions, numeric, 2-7, 3-4, 4-5, 4-18, C-3, E-3, F-8 
ASM386 instructions, E-3 
CL387, F-8 
DC387, F-8 
Exponential, 3-10, 3-25, 3-90, 3-151 
Exponentiate, see Power functions 
Extended format real, D-2 


~20, B-10, F-6, F-8 
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Far libraries, 1-2, 1-4, 2-2, 3-2, 4-2, B-5, B-8, F-1 


FCOMP/FCOMPP instructions, 4-16 
FCOS instruction, 3-19 
Floating-point 

formats, D-2 

instructions, E-1 
FNCLEX< instruction, 4-10, 4-13, 4-17 
FNSTSW instruction, 4-10, 4-13, 4-17 
FORMAT byte, ESTATE387, 4-8, 4-11 
FPREM instruction, 3-59 
FPREM|I instruction, 3-61 
FPTAN instruction, 3-70 
FS register, 2-6, 3-3, 4-3 
FSAVE/FNSAVE instructions, 4-9, F-9 
FSIN instruction, 3-66 
FUCOMP/FUCOMP? instructions, 4-16 
Functions, 2-5, see also 

Real functions and 

Complex functions 


G-H 


GS register, 2-6, 3-3, 4-3 
Hyperbolic functions, 3-10, 3-91 
Arc cosine, see Arccosh 
Arc sine, see Arcsinh 
Arc tangent, see Arctanh 
cosine, see Cosh 
sine, see Sinh 
tangent, see Tanh 
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IEEE754 Standard, 2-1, 3-9, C-1 
Implicit integer bit, D-2 
Indefinite values 

integer, D-1 

QNaN, D-3 
Inexact exception, see Precision exception 
Infinity 

complex projection, 3-92, 3-165 

signed, 2-13, 2-28, 2-31, 3-8, D-3 
INIT87, 1-3 
INITFP, 1-3 
Initialization library, I-1 

PUBLIC symbols, A-1 
Installation, see the 80387 Support Library Release Notes 
Instruction pointer offset, see EIP offset 
Instruction pointer, 80387 State, 2-9, 3-7, 4-12 
Instructions, ASM386, E-1 : 
INT instruction, 4-15 
Integer formats, D-1 
Interrupt 16, 2-8, 3-6, 4-10 
Interrupt handler, see Exception handler 
Invalid Operation exception, 1-3, 2-7, 3-5, E-3 
IRETD instruction, 2-8, 3-6, 4-10, 4-15 


L 


Linking to Support Libraries, 1-2, 3-2, 4-3, A-1 
Ln, see Logarithm, natural 
Logarithm 
common, 3-10, 3-51 
natural, 3-10, 3-53, 3-90, 3-154 
Long integer, 3-31, 3-39, 3-47, 3-84, D-1 
Long real, see Double format 
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Machine state, 80387, see State 
Machine_pi, 80387, 3-9 

Magnitude, complex number, 3-92, 3-93, 3-96, 3-161 
Masked exceptions, 1-3, 2-7, 2-8, 3-4, 3-6 
Maximum, 3-11, 3-55 

Minimum, 3-11, 3-57 

Modulus, 3-11, 3-59 
mqcBIN_DECLOW, 2-10, 2-12, B-2, F-1 
mqcDEC_ BIN, 2-10, 2-16, F-2 
mqcDECLOW_BIN, 2-10, 2-16, 2-20, B-5, F-2 
mqcDUBL_XTND, 2-10, 2-24, F-2 
mqcSNGL_XTND, 2-10, 2-26, F-3 
mqcXTND_DUBL, 2-10, 2-28, F-3 
maqcXTND_SNGL, 2-10, 2-31, F-3 
mqgerACS, 3-10, 3-13, B-7 
maerASN, 3-10, 3-15 

mqaerATN, 3-10, 3-17 

maerCABS, 3-92, 3-96 

magerCACH, 3-91, 3-99 

maerCACS, 3-91, 3-103 
maerCASH, 3-91, 3-107 
mgerCASN, 3-91, 3-111 
maerCATH, 3-91, 3-115 
maerCATN, 3-91, 3-119 
mgerCC2C, 3-90, 3-123 
mgerCC2R, 3-90, 3-126 

mgerCCI2, 3-90, 3-129 

maerCCl4, 3-90, 3-132 

mgerCCI8, 3-90, 3-135 

mqaerCCIS, 3-90, 3-138 

mgerCCOS, 3-91, 3-141 
maqerCCSH, 3-91, 3-144 
maerCDIV, 3-92, 3-147 
mgerCEXP, 3-90, 3-151 
mqerCLGE, 3-90, 3-154 
mgerCMUL, 3-92, 3-158 

mqgerCOS, 3-10, 3-19 

mqaerCPOL, 3-91, 3-126, 3-161 
maerCPRJ, 3-92, 3-165 
mqgerCR2C, 3-90, 3-167 
maerCREC, 3-91, 3-170 
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mqaerCSH, 3-10, 3-21 
mqgerCSIN, 3-91, 3-173 
mgerCSNH, 3-91, 3-176 
mqaerCSQR, 3-92, 3-179 
maerCTAN, 3-91, 3-181 
mgerCTNH, 3-91, 3-184 
mgqerDIM, 3-11, 3-23 
maqerEXP, 3-10, 3-25 
maerJA2, 3-11, 3-27 
mgerIA4, 3-11, 3-29 
mqaerIA8, 3-11, 3-31 
maerIAX, 3-11, 3-33 
mqgerIC2, 3-11, 3-35 
mqerIC4, 3-11, 3-37 
mgaerIC8, 3-11, 3-39 
maerICX, 3-11, 3-41 
meaerIE2, 3-11, 3-43, B-8 
mgerlIE4, 3-11, 3-45 
maerlE8, 3-11, 3-47 
maerlIEX, 3-11, 3-49 
mqerLGD, 3-10, 3-51 
mgqerLGE, 3-10, 3-53 
maqerMAX, 3-11, 3-55 
maerMIN, 3-11, 3-57 
mqerMOD, 3-11, 3-59 
maqerRMD, 3-11, 3-61 
mgerSGN, 3-11, 3-64 
mqaerSIN, 3-10, 3-66 
maerSNH, 3-10, 3-68 
maerTAN, 3-10, 3-70 
mqerTNH, 3-10, 3-72 
maerY2X, 3-10, 3-74 
maerYI2, 3-10, 3-78 
maerYI4, 3-10, 3-81 
mqaerYI8, 3-10, 3-84 
maerYIS, 3-10, 3-87 
Multiplication, complex numbers, 3-92, 3-158 
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NaN, 2-13, 2-28, 2-31, 3-8, D-3 
Natural logarithm, see Logarithm, natural 
we) Near libraries, 1-2, 1-4, 2-2, 3-2, 4-2, B-2, B-7, B-8, F-1 
Number formats, D-1 
Numeric exceptions, see Exceptions 


O 


OMF386, 1-1, 2-1, 3-1, 4-3, B-1 
op_arg and op_rad, 3-93, 3-161, 3-170 
Opcode field, 80387 State, 2-9, 3-7, 4-12, F-9 
Operand 

pointer, 80387 State, 4-12 

selector, 80387 State, 4-12 
OPERATION field, ESTATE387, 4-6, 4-11, F-9 
Overflow exception, 2-8, 3-5, C-3, E-3 


O »- 


Pi value, 80387 (machine_pi), 3-9 
Pointer parameters, 2-2 to 2-4, 2-11, 2-12, 2-16, 2-20, 2-24, 2-26, 2-28, 
2-31, 4-4, 4-16, 4-18, B-2, B-5, F-1 to F-3, F-6 
Polar representation, complex number, 3-91, 3-94, 3-161, 3-170 
Positive Difference, 3-11, 3-23 
Power functions, 3-10, 3-74 to 3-87, 3-90, 3-123 to 3-138, 3-167 
Precision 
exception, 2-8, 3-4, 3-6, C-3, E-3 
mode, 1-3, 3-4, 3-23 
Procedures, 2-5 
Processor Extension Error, 80386, 2-8, 3-6, 4-10 
Projection, infinite complex number, 3-92, 3-165 
Protocols, exception handler, 4-10 
PSH bit, ARGUMENT byte, 4-6 
oO PUBLIC symbols, 1-1, 2-10, 3-8, 4-3, A-1 


Index-9 


Q-R 


QNaN indefinite, 3-8, D-3 
Raise to power, see Power functions 
Range, complex 

Are cosine, 3-104 

Arc sine, 3-112 

Arc tangent, 3-120 

Arccosh, 3-100 

Arcsinh, 3-108 

Arctanh, 3-116 

cosh, 3-100 

cosine, 3-104 

natural logarithm, 3-155 

sine, 3-112 

sinh, 3-108 

tangent, 3-120 

tanh, 3-116 
Real 

formats, see Floating-point formats 

functions, 3-8, 3-13 to 3-89, F-4 

infinity values, D-3 

QNaN indefinite values, D-3 

conversions to integer, 3-11, 3-27 to 3-49 

zero values, D-3 
Rectangular representation, complex number, 3-91, 3-93, 3-161, 3-170 
Recursion, exception handler, 2-6, 3-3, 4-10, 4-19 
Reentrancy, 2-6, 3-3, 4-3, 4-10, F-8 
REGISTER byte, ESTATE387, 4-9, 4-11 
Remainder, 3-11, 3-61 
RESI field, ESTATE387, 4-8, 4-11 
RES1_ FULL field, ESTATE387, 4-8, 4-11 
RES2 field, ESTATE387, 4-8, 4-11 
RES2_ FULL field, ESTATE387, 4-8, 4-11 
Reserved names, see PUBLIC symbols 
RESULT byte, ESTATE387, 4-7, 4-11 
Riemann sphere, 3-165 
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Round 
away from zero, 3-27, 3-29, 3-31, 3-33 
real to integer, 3-11, 3-27 to 3-49, 3-61 
to even, 3-43, 3-45, 3-47, 3-49, 3-61 
toward zero, 3-35, 3-37, 3-39, 3-41 
Rounding mode, 1-3, 2-6, 3-4, 3-9, 3-23 
RTYP1 and RTYP2 fields, RESULT byte, 4-7, 4-8 


Ss 


SAVE387 field, ESTATE387, 4-9 

Segment names, 1-2, 1-4, 2-2, 3-2, 4-2, 4-11 

SGN function, 3-11, 3-64 

Short integer, 3-29, 3-37, 3-45, 3-81, 3-87, 3-132, 3-138, D-1 

Short real, see Single format 

Signaling NaN (SNaN), 3-8 

Sine, 3-10, 3-66, 3-91, 3-173 

Single format real, C-1, D-2 

Sinh, 3-10, 3-68, 3-91, 3-176 

Special values, 80387, 2-13, 2-28, 2-31, 3-8, D-3 

Square root, complex number, 3-92, 3-179 

SS register, 1-2, 2-6, 3-3, 4-3, 4-11 

Stack 
80386, 1-2, 2-2, 2-5, 2-6, 
80387, 1-3, 2-6, 2-8, 2-9, 
frame, 80386, 4-11 
overflow/underflow, 3-3, 3-6, E-3 

State, 80387, 2-6 to 2-8, 3-6, 4-2, 4-4, 4-9, 4-16, 4-18, F-6 

Status Word, 80387, 2-9, 3-4, 3-7, 3-59, 3-62, 4-1, 4-9 to 4-11] 

String, ASCII, 2-12, 2-16, 2-20 


, 3-87, 3-138, 4-3, 4-4, 4-10, F-1, F-6 
3-6, 3-7, 4-3, 4-9, 4-16, B-1, F-3 


3-3 
3-3, 
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Tag Word, 80387, 2-9, 3-7, 4-11 
Tangent, 3-10, 3-70, 3-91, 3-181 
Tanh, 3-10, 3-72, 3-91, 3-184 oO 
Tempreal, see Extended format 
Transcendental, see Trigonometric, Hyperbolic, Logarithm, and Exposaniial 
Trap 
80386, 3-6 
handler, see Exception handler 
Trigonometric functions, 3-10, 3-91 
Truncate real, 3-11, 3-35, 3-37, 3-39, 3-41, 3-59 


U-V 
Underflow exception, 2-8, 3-5, C-3, E-3 
Unmasked exceptions, 2-8, 3-6, 4-1, 4-19, F-9 
USE32, 1-2, 1-4, 2-2, 3-2, 4-2, 4-4, F-1 
Values, indefinite, D-1, D-3 


W-Z 


Word integer, 3-27, 3-35, 3-43, 3-78, 3-129, D-1 
z_re and z_im, 3-93, 3-161, 3-170 

Zero, signed, 2-13, 2-28, 2-31, 3-8, 3-23, D-3 
Zerodivide exception, 3-5, C-3, E-3 
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